solving bug in webview-get-style

2026-07-30 11:53:06 +02:00
parent 39b6e1adf5
commit c02fe6ee99
1 changed files with 4 additions and 4 deletions
@@ -1028,14 +1028,14 @@
    (let* ((js-code (with-selector sel
                       (λ (id el)
                         (let ((cl (eval cl))
-                               (r (make-hash)))
+                               (r '()))
                           (send cl forEach
                                 (λ (st)
                                   (let ((stl (send window getComputedStyle el)))
                                     (set! (js-ref r st) (js-ref stl st)))))
-                           (make-hash (list
+                           (list (list 'id id)
-                                       (list 'id id)
+                                 (list 'style r))))
-                                       (list 'style r)))))))
+                      ))
           (r (webview-call-js wv js-code))
           )
 ;                       (format