webview-get-style debugging
This commit is contained in:
@@ -1031,8 +1031,10 @@
|
|||||||
(r '()))
|
(r '()))
|
||||||
(send cl forEach
|
(send cl forEach
|
||||||
(λ (st)
|
(λ (st)
|
||||||
|
(send console log set)
|
||||||
(let ((stl (send window getComputedStyle el)))
|
(let ((stl (send window getComputedStyle el)))
|
||||||
(set! (js-ref r st) (js-ref stl st)))))
|
(set! (js-ref r st) (js-ref stl st)))))
|
||||||
|
(send console log r)
|
||||||
(return (list (list 'id id)
|
(return (list (list 'id id)
|
||||||
(list 'style r)))))
|
(list 'style r)))))
|
||||||
))
|
))
|
||||||
|
|||||||
Reference in New Issue
Block a user