From 4b59108fdd320d32378cd1f31e9f394af52122ea Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Mon, 5 Aug 2019 19:45:10 +0100 Subject: Properly handle not finding a matching derivation --- guix-data-service/web/controller.scm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'guix-data-service/web') diff --git a/guix-data-service/web/controller.scm b/guix-data-service/web/controller.scm index 974722d..e55ebae 100644 --- a/guix-data-service/web/controller.scm +++ b/guix-data-service/web/controller.scm @@ -518,8 +518,11 @@ builds) #:extra-headers http-headers-for-unchanging-content)) - #f ;; TODO - ))) + (render-html + #:sxml (general-not-found + "Derivation not found" + "No derivation found with this file name.") + #:code 404)))) (define (render-store-item conn filename) (let ((derivation (select-derivation-by-output-filename conn filename))) -- cgit v1.2.3