debug webview-call-js

This commit is contained in:
2026-05-18 11:49:48 +02:00
parent 18cd4d3bd9
commit dff979350a
+1 -1
View File
@@ -763,7 +763,7 @@
(define/contract (webview-call-js wv js)
(-> wv-win? string? (or/c string? list? boolean? hash? symbol? number?))
(let ((result (rkt-webview-call-js (wv-win-handle wv) js)))
;(displayln result)
(displayln result)
(if (webview-call-js-result? result)
(if (eq? (car result) 'oke)
(hash-ref (fromJson (cadr result)) 'result #f)