webview-get-style debugging

This commit is contained in:
2026-07-30 13:22:38 +02:00
parent 6a4dd25dfe
commit ac961f5fe0
+2
View File
@@ -1063,6 +1063,8 @@
(make-hash (map (λ (e) (cons (car e) (cadr e))) (cadr style-rec))) (make-hash (map (λ (e) (cons (car e) (cadr e))) (cadr style-rec)))
) )
)) h))) )) h)))
(displayln (format "l = ~a" l))
(write l)(newline)
(if (symbol? selector) (if (symbol? selector)
(cdr (car l)) (cdr (car l))
l)))) l))))