Don't display javascript code

This commit is contained in:
2026-07-03 14:32:57 +02:00
parent 9a670acf15
commit ee5cc863fa
+1 -1
View File
@@ -784,7 +784,7 @@
(define/contract (webview-call-js wv js) (define/contract (webview-call-js wv js)
(-> wv-win? string? (or/c string? list? boolean? hash? symbol? number?)) (-> wv-win? string? (or/c string? list? boolean? hash? symbol? number?))
(displayln js) ;(displayln js)
(let ((result (rkt-webview-call-js (wv-win-handle wv) js))) (let ((result (rkt-webview-call-js (wv-win-handle wv) js)))
(if (webview-call-js-result? result) (if (webview-call-js-result? result)
(if (eq? (car result) 'oke) (if (eq? (car result) 'oke)