diff options
| -rw-r--r-- | guix-data-service/web/repository/html.scm | 24 |
1 files changed, 17 insertions, 7 deletions
diff --git a/guix-data-service/web/repository/html.scm b/guix-data-service/web/repository/html.scm index 0141058..9e94bf3 100644 --- a/guix-data-service/web/repository/html.scm +++ b/guix-data-service/web/repository/html.scm @@ -176,13 +176,23 @@ (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") + (div + (@ (class "btn-group pull-right") + (role "group")) + (a (@ (class "btn btn-default btn-lg") + (href ,(string-append + "/repository/" git-repository-id + "/branch/" branch-name + "/package/" package-name + "/derivation-history"))) + "Include derivations") + (a (@ (class "btn btn-default btn-lg") + (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 |