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

Fix a bug with the derivation and output history JSON representation

Browse source 
Thanks to zimoun for reporting.
This commit is contained in:
Christopher Baines 2020-07-01 19:57:06 +01:00
parent dc8b442e12
commit bbf8011c95
1 changed files with 10 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

14
guix-data-service/web/repository/controller.scm
View file

@ -365,7 +365,8 @@
first-guix-revision-commit first-guix-revision-commit
first-datetime first-datetime
last-guix-revision-commit last-guix-revision-commit
last-datetime) last-datetime
builds)
`((version . ,package-version) `((version . ,package-version)
(derivation . ,derivation-file-name) (derivation . ,derivation-file-name)
(first_revision (first_revision
@ -373,7 +374,9 @@
(datetime . ,first-datetime))) (datetime . ,first-datetime)))
(last_revision (last_revision
. ((commit . ,last-guix-revision-commit) . ((commit . ,last-guix-revision-commit)
(datetime . ,last-datetime)))))) (datetime . ,last-datetime)))
(builds
. ,(list->vector builds)))))
package-derivations)))))) package-derivations))))))
(else (else
(render-html (render-html
@ -430,7 +433,8 @@
first-guix-revision-commit first-guix-revision-commit
first-datetime first-datetime
last-guix-revision-commit last-guix-revision-commit
last-datetime) last-datetime
builds)
`((version . ,package-version) `((version . ,package-version)
(derivation . ,derivation-file-name) (derivation . ,derivation-file-name)
(first_revision (first_revision
@ -438,7 +442,9 @@
(datetime . ,first-datetime))) (datetime . ,first-datetime)))
(last_revision (last_revision
. ((commit . ,last-guix-revision-commit) . ((commit . ,last-guix-revision-commit)
(datetime . ,last-datetime)))))) (datetime . ,last-datetime)))
(builds
. ,(list->vector builds)))))
package-outputs)))))) package-outputs))))))
(else (else
(render-html (render-html