display statements removed.

2026-08-04 14:05:43 +02:00
parent d6f555d43f
commit 3d4deed94a
2 changed files with 6 additions and 6 deletions
@@ -53,11 +53,11 @@
        (let ((d* (string->symbol (format "~a" (car d)))))
          (webview-set-style! wv element-id (list 'display d*))))
      (let ((style-hash (webview-get-style wv element-id 'display)))
-        (displ "style-hash: ") (write style-hash) (newline)
+        ;(displ "style-hash: ") (write style-hash) (newline)
        (let ((display-style (hash-ref (if (eq? style-hash #f)
                                           (make-hash)
                                           style-hash) 'display #f)))
-          (displayln display-style)
+          ;(displayln display-style)
          (if (eq? display-style #f)
              #f
              (string->symbol display-style)))))