guix/data-service
2
0
Fork 0
mirror of git://git.savannah.gnu.org/guix/data-service.git synced 2023-12-14 03:23:03 +01:00
Code Issues Releases Wiki Activity

Include if data is available in the JSON response for a branch

Browse source
This commit is contained in:
Christopher Baines 2020-04-24 18:54:12 +01:00
parent f83cff7107
commit 5af213a165
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -88,9 +88,10 @@
`((revisions
. ,(list->vector
(map (match-lambda
((commit-hash date _ _)
`((date . ,date)
(commit-hash . ,commit-hash))))
((commit-hash date revision-exists? _)
`((date . ,date)
(commit-hash . ,commit-hash)
(data_available . ,revision-exists?))))
revisions))))))
(else
(render-html