webview-get-style debugging

2026-07-30 13:30:36 +02:00
parent ac961f5fe0
commit 31b1e82834
2 changed files with 12 additions and 4 deletions
@@ -1052,7 +1052,7 @@
      ;                         "  return { id: id, style: r };"
      ;                         "}") cl))
      ;                     )))
-      (displayln (format "~a: ~a" r js-code))
+      ;(displayln (format "~a: ~a" r js-code))
      (if (eq? r #f)
          #f
          (let ((h (hash-ref r 'with-ids)))
@@ -1063,8 +1063,10 @@
                                     (make-hash (map (λ (e) (cons (car e) (cadr e))) (cadr style-rec)))
                                     )
                               )) h)))
-              (displayln (format "l = ~a" l))
-              (write l)(newline)
+              ;(displayln (format "l = ~a" l))
+              ;(write l)(newline)
+              ; l = ((volume-meter . #hash((display . none))))
+              ; ((volume-meter . #hash(("display" . "none"))))
              (if (symbol? selector)
                  (cdr (car l))
                  l))))