aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service/web/view
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2019-09-27 17:53:45 +0100
committerChristopher Baines <mail@cbaines.net>2019-09-27 17:53:45 +0100
commit4df889fc3ce99cdb418f1af8f1360cfec77968a7 (patch)
tree39404932ea33c41e4f5659702fdd18c4f092cfd3 /guix-data-service/web/view
parent00ac080297f03b05b13360d96226ea526245bd3e (diff)
downloaddata-service-4df889fc3ce99cdb418f1af8f1360cfec77968a7.tar
data-service-4df889fc3ce99cdb418f1af8f1360cfec77968a7.tar.gz
Add JSON output for the branch package versions page
Diffstat (limited to 'guix-data-service/web/view')
-rw-r--r--guix-data-service/web/view/html.scm7
1 files changed, 7 insertions, 0 deletions
diff --git a/guix-data-service/web/view/html.scm b/guix-data-service/web/view/html.scm
index a170d6d..e3836ae 100644
--- a/guix-data-service/web/view/html.scm
+++ b/guix-data-service/web/view/html.scm
@@ -1107,6 +1107,13 @@
(a (@ (href ,(string-append "/repository/" git-repository-id
"/branch/" branch-name)))
(h3 ,(string-append branch-name " branch")))
+ (a (@ (class "btn btn-default btn-lg pull-right")
+ (href ,(string-append
+ "/repository/" git-repository-id
+ "/branch/" branch-name
+ "/package/" package-name
+ ".json")))
+ "View JSON")
(h1 (@ (style "white-space: nowrap;"))
(samp ,package-name))))
(div