Properly handle not finding a matching derivation
This commit is contained in:
parent
70126f7ed0
commit
4b59108fdd
1 changed files with 5 additions and 2 deletions
|
|
@ -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)))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue