Fix the field names for the JSON representation of a branch

This commit is contained in:
Christopher Baines 2020-04-24 10:38:34 +01:00
parent 7a7dedfa1b
commit c2ba4e7142

View file

@ -88,7 +88,7 @@
`((revisions `((revisions
. ,(list->vector . ,(list->vector
(map (match-lambda (map (match-lambda
((date commit-hash _ _) ((commit-hash date _ _)
`((date . ,date) `((date . ,date)
(commit-hash . ,commit-hash)))) (commit-hash . ,commit-hash))))
revisions)))))) revisions))))))