aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2021-05-27 09:38:41 +0100
committerChristopher Baines <mail@cbaines.net>2021-05-27 09:38:41 +0100
commit854f2cbba94a6a0bcb7a0bd1ee9d2706b8b6f58a (patch)
tree9a0fd8fe18ed4dfffb98ac0f0550117fe14e0a64 /guix-data-service
parentf4a87ec059519aefe6158b34049219542d03a22a (diff)
downloaddata-service-854f2cbba94a6a0bcb7a0bd1ee9d2706b8b6f58a.tar
data-service-854f2cbba94a6a0bcb7a0bd1ee9d2706b8b6f58a.tar.gz
Fix a URI decoding issue
This caused a problem viewing this derivation /gnu/store/65r4488732qy6ilrh1ryb8xwmip1qnir-tklib-0.6.tar.gz?uuid=tklib-0-6.drv
Diffstat (limited to 'guix-data-service')
-rw-r--r--guix-data-service/web/controller.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/guix-data-service/web/controller.scm b/guix-data-service/web/controller.scm
index 60773ca..b344101 100644
--- a/guix-data-service/web/controller.scm
+++ b/guix-data-service/web/controller.scm
@@ -636,8 +636,8 @@
;; content negotiation, so just use the path from the request
(let ((path (uri-path (request-uri request))))
(if (string-suffix? ".drv" path)
- (render-derivation path)
- (render-store-item path))))
+ (render-derivation (uri-decode path))
+ (render-store-item (uri-decode path)))))
(('GET "gnu" "store" filename "formatted")
(if (string-suffix? ".drv" filename)
(render-formatted-derivation (string-append "/gnu/store/" filename))