aboutsummaryrefslogtreecommitdiff
path: root/guix-qa-frontpage/server.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix-qa-frontpage/server.scm')
-rw-r--r--guix-qa-frontpage/server.scm6
1 files changed, 5 insertions, 1 deletions
diff --git a/guix-qa-frontpage/server.scm b/guix-qa-frontpage/server.scm
index 17b8c29..2ab2bb2 100644
--- a/guix-qa-frontpage/server.scm
+++ b/guix-qa-frontpage/server.scm
@@ -69,7 +69,11 @@
(('GET "assets" rest ...)
(or (handle-static-assets (string-join rest "/")
(request-headers request))
- (not-found (request-uri request))))
+ (list (build-response #:code 404)
+ (string-append
+ "Resource not found: "
+ (uri->string
+ (request-uri request))))))
(('GET "metrics")
(gc-metrics-updater!)
(list (build-response