cbaines/guix-data-service
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Include the revision details for package dervation comparisons

Browse source 
I'm wanting the commits for tagging builds.
This commit is contained in:
Christopher Baines 2020-12-20 19:37:36 +00:00
parent 1df7b46343
commit c12959330b
1 changed files with 16 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

18
guix-data-service/web/compare/controller.scm
View file

@ -636,7 +636,13 @@
mime-types) mime-types)
((application/json) ((application/json)
(render-json (render-json
derivation-changes)) `((revisions
. ((base
. ((commit . ,base-commit)))
(target
. ((commit . ,target-commit)))))
(derivation_changes
. ,derivation-changes))))
(else (else
(letpar& ((systems (letpar& ((systems
(with-thread-postgresql-connection (with-thread-postgresql-connection
@ -729,7 +735,15 @@
mime-types) mime-types)
((application/json) ((application/json)
(render-json (render-json
derivation-changes)) `((revisions
. ((base
. ((commit . ,(second base-revision-details))
(datetime . ,(fifth base-revision-details))))
(target
. ((commit . ,(second target-revision-details))
(datetime . ,(fifth target-revision-details))))))
(derivation_changes
. ,derivation-changes))))
(else (else
(render-html (render-html
#:sxml (compare/package-derivations #:sxml (compare/package-derivations