-

private/web-wire.rkt

@@ -76,6 +76,8 @@
            ww-on
            ww-element-info
 
+           ww-exec-js
+
            ww-file-open
            ww-file-save
            ww-choose-dir
@@ -915,6 +917,12 @@
 
   (define (ww-await . args)
     #t)
+
+  ;; Execute Javascript
+  (def-cmd ww-exec-js
+    exec-js ((win-id ww-win?)
+             (js string?)) () -> string)
+    
   
   ;; get value of an element
   (def-cmd ww-get-value