popup-menu
This commit is contained in:
@@ -542,7 +542,7 @@
|
|||||||
(-> wv-win? is-wv-menu? number? number? symbol?)
|
(-> wv-win? is-wv-menu? number? number? symbol?)
|
||||||
(let* ((json (wv-menu->json menu))
|
(let* ((json (wv-menu->json menu))
|
||||||
(js (string-append "window._web_wire_popup_menu(JSON.parse('"
|
(js (string-append "window._web_wire_popup_menu(JSON.parse('"
|
||||||
json "', " (format "~a, ~a" x y)
|
json "'), " (format "~a, ~a" x y)
|
||||||
");"))
|
");"))
|
||||||
)
|
)
|
||||||
(webview-run-js wv js)))
|
(webview-run-js wv js)))
|
||||||
|
|||||||
Reference in New Issue
Block a user