From 75232b14603bcd8547cd52bc32ce1cc7e3b2f5ab Mon Sep 17 00:00:00 2001 From: Hans Dijkema Date: Thu, 30 Jul 2026 13:41:29 +0200 Subject: [PATCH] webview-get-style debugging --- wv-element.rkt | 2 ++ 1 file changed, 2 insertions(+) diff --git a/wv-element.rkt b/wv-element.rkt index a4b659f..9bf34d3 100644 --- a/wv-element.rkt +++ b/wv-element.rkt @@ -51,9 +51,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))) + (displayln style-hash) (let ((display-style (hash-ref (if (eq? style-hash #f) (make-hash) style-hash) 'display #f))) + (displayln display-style) (if (eq? display-style #f) #f (string->symbol display-style)))))