Fix branch package version page if no data is found

This commit is contained in:
Christopher Baines 2025-01-27 12:25:11 +00:00
parent 9a1c1b30cb
commit 83f2981c64

View file

@ -188,12 +188,18 @@
(datetime . ,last-datetime)))))) (datetime . ,last-datetime))))))
package-versions)))))) package-versions))))))
(else (else
(render-html (if (null? package-versions)
#:sxml (view-branch-package (render-html
repository-id #:sxml (general-not-found
branch-name "Package or branch not found"
package-name "")
package-versions)))))) #:code 404)
(render-html
#:sxml (view-branch-package
repository-id
branch-name
package-name
package-versions)))))))
(('GET "repository" repository-id "branch" branch-name "package" package-name "derivation-history") (('GET "repository" repository-id "branch" branch-name "package" package-name "derivation-history")
(render-branch-package-derivation-history request (render-branch-package-derivation-history request
mime-types mime-types