guix
/
data-service
mirror of git://git.savannah.gnu.org/guix/data-service.git
2
0
Fork 0
Code Issues Releases Wiki Activity

Remove hardcoding of builtin:download 

As this was causing problems with builtin:git-download.
This commit is contained in:
Christopher Baines 2023-11-16 12:20:55 +00:00
parent de211ef5ea
commit da2a405e8b
1 changed files with 4 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
guix-data-service/web/view/html.scm
View File

@ -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))