diff --git a/racket-webview.rkt b/racket-webview.rkt index 7dbf010..98409b6 100644 --- a/racket-webview.rkt +++ b/racket-webview.rkt @@ -704,6 +704,9 @@ #:not-exist [on-not-exist (λ (file base-path path) path)] ) (λ (file) + (let* ((idx (string-find file "?"))) + (unless (eq? idx #f) + (set! file (substring file 0 idx)))) (let ((f (if (string=? file "/") "index.html" file))) (when (string-prefix? f "/") (set! f (substring f 1)))