aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service/web/compare
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2020-10-09 19:35:38 +0100
committerChristopher Baines <mail@cbaines.net>2020-10-09 19:35:38 +0100
commit2fa9f151f64c6bd70a7bf8ad5c08fe09ea51af5a (patch)
tree2f57b09e206889e5859bb76995562e3a4a585585 /guix-data-service/web/compare
parent3cb8ce51fcc0b319f0e49d9a71cfef5bf46786fc (diff)
downloaddata-service-2fa9f151f64c6bd70a7bf8ad5c08fe09ea51af5a.tar
data-service-2fa9f151f64c6bd70a7bf8ad5c08fe09ea51af5a.tar.gz
Include the base commit and target commit in the compare output
This makes it easier to make other requests with the response body.
Diffstat (limited to 'guix-data-service/web/compare')
-rw-r--r--guix-data-service/web/compare/controller.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/guix-data-service/web/compare/controller.scm b/guix-data-service/web/compare/controller.scm
index 6d7e78b..2a55d56 100644
--- a/guix-data-service/web/compare/controller.scm
+++ b/guix-data-service/web/compare/controller.scm
@@ -228,7 +228,9 @@
mime-types)
((application/json)
(render-json
- `((channel-news . ,(list->vector
+ `((base-commit . ,(assq-ref query-parameters 'base_commit))
+ (target-commit . ,(assq-ref query-parameters 'target_commit))
+ (channel-news . ,(list->vector
(map
(match-lambda
((commit tag title_text body_text change)