diff options
| -rw-r--r-- | guix-data-service/web/view/html.scm | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/guix-data-service/web/view/html.scm b/guix-data-service/web/view/html.scm index 29eaf62..ab09644 100644 --- a/guix-data-service/web/view/html.scm +++ b/guix-data-service/web/view/html.scm @@ -640,9 +640,8 @@ (tbody (tr (td "Builder") - (td ,(if (string=? "builtin:download" - builder) - "builtin:download" + (td ,(if (string-prefix? "builtin:" builder) + builder `(a (@ (href ,builder)) ,(display-file-in-store-item builder))))) (tr @@ -852,9 +851,8 @@ (@ (class "col-md-10") (style "font-family: monospace;")) (span (@ (style "margin-left: 1.5em;")) - ,@(if (string=? "builtin:download" - builder) - '("builtin:download") + ,@(if (string-prefix? "builtin:" builder) + (list builder) `("\"" (a (@ (href ,builder)) ,(display-file-in-store-item-oneline builder)) |