aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix-data-service/web/repository/controller.scm11
-rw-r--r--guix-data-service/web/revision/controller.scm1
2 files changed, 12 insertions, 0 deletions
diff --git a/guix-data-service/web/repository/controller.scm b/guix-data-service/web/repository/controller.scm
index 0f8a5e7..530d52d 100644
--- a/guix-data-service/web/repository/controller.scm
+++ b/guix-data-service/web/repository/controller.scm
@@ -201,6 +201,17 @@
(render-unknown-revision mime-types
conn
commit-hash))))
+ (('GET "repository" repository-id "branch" branch-name "latest-processed-revision" "package-reproducibility")
+ (let ((commit-hash
+ (latest-processed-commit-for-branch conn repository-id branch-name)))
+ (if commit-hash
+ (render-revision-package-reproduciblity mime-types
+ conn
+ commit-hash
+ #:path-base path)
+ (render-unknown-revision mime-types
+ conn
+ commit-hash))))
(('GET "repository" repository-id "branch" branch-name "latest-processed-revision"
"lint-warnings")
(let ((commit-hash
diff --git a/guix-data-service/web/revision/controller.scm b/guix-data-service/web/revision/controller.scm
index d723c16..62ddca1 100644
--- a/guix-data-service/web/revision/controller.scm
+++ b/guix-data-service/web/revision/controller.scm
@@ -53,6 +53,7 @@
render-revision-lint-warnings
render-revision-package-version
render-revision-packages
+ render-revision-package-reproduciblity
render-revision-package-derivations
render-unknown-revision
render-view-revision))