aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service/web/view
diff options
context:
space:
mode:
authorDanjela Lura <danielaluraa@gmail.com>2020-08-26 14:03:08 +0200
committerChristopher Baines <mail@cbaines.net>2020-08-26 21:26:08 +0100
commit50d2e4e15844514702eba1c7d19a65061557b002 (patch)
tree7310c14e9e498aa083df17c48b0ab2c8f88b97c4 /guix-data-service/web/view
parentd5c101dee79f4f9ddff68dada0d012afb8f42aa6 (diff)
downloaddata-service-50d2e4e15844514702eba1c7d19a65061557b002.tar
data-service-50d2e4e15844514702eba1c7d19a65061557b002.tar.gz
Add JSON representation for the store item page
Signed-off-by: Christopher Baines <mail@cbaines.net>
Diffstat (limited to 'guix-data-service/web/view')
-rw-r--r--guix-data-service/web/view/html.scm13
1 files changed, 10 insertions, 3 deletions
diff --git a/guix-data-service/web/view/html.scm b/guix-data-service/web/view/html.scm
index 405babe..4b11f76 100644
--- a/guix-data-service/web/view/html.scm
+++ b/guix-data-service/web/view/html.scm
@@ -456,9 +456,16 @@ time."
(div
(@ (class "col-sm-12"))
(h2 "Nars")
- (a (@ (class "btn btn-default btn-lg pull-right")
- (href ,(string-append filename "/narinfos")))
- "View narinfo details")
+ (div
+ (@ (class "btn-group pull-right")
+ (role group))
+ (a (@ (class "btn btn-default btn-lg")
+ (href ,(string-append filename "/narinfos")))
+ "View narinfo details")
+ (a (@ (class "btn btn-lg btn-default")
+ (href ,(string-append filename "/json"))
+ (role "button"))
+ "View JSON"))
,@(map
(match-lambda
((hash-algorithm hash size urls signatures)