diff options
| author | Miguel Ángel Moreno <mail@migalmoreno.com> | 2023-05-19 11:28:49 +0200 |
|---|---|---|
| committer | Miguel Ángel Moreno <mail@migalmoreno.com> | 2023-05-19 11:28:49 +0200 |
| commit | faca54002b3895aafae814984fef317eaf635706 (patch) | |
| tree | 47f8b98286abbe74cdc2af1eab0fd290133b9d56 | |
| parent | 8b721049333f7ff774d351af2fff873c12e39d6b (diff) | |
feat: Decode URI for opener resource
| -rw-r--r-- | router.lisp | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/router.lisp b/router.lisp index 444639b..3555429 100644 --- a/router.lisp +++ b/router.lisp @@ -430,12 +430,13 @@ If REVERSE, reverse the redirect logic." (defmethod compute-route ((route opener) url &key) (with-slots (resource) route - (typecase resource - (string - (uiop:run-program (format nil resource (quri:render-uri url)))) - ((or function symbol) - (nyxt:run-thread "Spawn external rules" - (funcall resource (quri:render-uri url)))))) + (let ((url (quri:url-decode (quri:render-uri url)))) + (typecase resource + (string + (uiop:run-program (format nil resource url))) + ((or function symbol) + (nyxt:run-thread "Spawn external rules" + (funcall resource url)))))) nil) (nyxt::define-internal-page-command-global display-blocked-page (&key url) |