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

Fix the JSON compare output

Browse source
This commit is contained in:
Christopher Baines 2019-07-29 19:48:57 +01:00
parent 08d9cbbfe3
commit f2c7cc83ed
1 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

8
guix-data-service/web/controller.scm
View file

@ -374,7 +374,13 @@
(render-json (render-json
`((new-packages . ,(list->vector new-packages)) `((new-packages . ,(list->vector new-packages))
(removed-packages . ,(list->vector removed-packages)) (removed-packages . ,(list->vector removed-packages))
(version-changes . ,(list->vector version-changes))) (version-changes . ,(list->vector
(map
(match-lambda
((name data ...)
`((name . ,name)
,@data)))
version-changes))))
#:extra-headers http-headers-for-unchanging-content)) #:extra-headers http-headers-for-unchanging-content))
(else (else
(render-html (render-html