aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix-data-service/web/revision/controller.scm9
1 files changed, 8 insertions, 1 deletions
diff --git a/guix-data-service/web/revision/controller.scm b/guix-data-service/web/revision/controller.scm
index 9f8592a..c48da0f 100644
--- a/guix-data-service/web/revision/controller.scm
+++ b/guix-data-service/web/revision/controller.scm
@@ -417,7 +417,14 @@
mime-types)
((application/json)
(render-json
- '())) ; TODO
+ `((channel_instances . ,(list->vector
+ (map
+ (match-lambda
+ ((system derivation-file-name builds)
+ `((system . ,system)
+ (derivation . ,derivation-file-name)
+ (builds . ,(list->vector builds)))))
+ channel-instances))))))
(else
(render-html
#:sxml (view-revision-channel-instances