-
This commit is contained in:
@@ -452,6 +452,8 @@
|
|||||||
(format "window.location = '~a';"
|
(format "window.location = '~a';"
|
||||||
(esc-quote place))))
|
(esc-quote place))))
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
(define/contract (webview-base-url wv)
|
(define/contract (webview-base-url wv)
|
||||||
(-> wv? url?)
|
(-> wv? url?)
|
||||||
(string->url (wv-base-url wv)))
|
(string->url (wv-base-url wv)))
|
||||||
|
|||||||
Reference in New Issue
Block a user