diff options
| author | Christopher Baines <mail@cbaines.net> | 2021-05-27 09:38:41 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2021-05-27 09:38:41 +0100 |
| commit | 854f2cbba94a6a0bcb7a0bd1ee9d2706b8b6f58a (patch) | |
| tree | 9a0fd8fe18ed4dfffb98ac0f0550117fe14e0a64 | |
| parent | f4a87ec059519aefe6158b34049219542d03a22a (diff) | |
| download | data-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
| -rw-r--r-- | guix-data-service/web/controller.scm | 4 |
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)) |