cbaines/guix-data-service
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Tweak linking to build servers

Browse source 
Move the logic from different places in the view code, and also start
supporting linking to guix.cbaines.net builds. I'm unsure quite how to
generalise this, but just starting doing it is probably the way forward.
This commit is contained in:
Christopher Baines 2020-10-11 21:19:00 +01:00
parent d05a7397fb
commit 4231f11cb8
4 changed files with 27 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

8
guix-data-service/web/build/html.scm
View file

@ -116,11 +116,9 @@
(td (a (@ (href ,derivation-file-name))
,(display-store-item-short derivation-file-name)))
(td ,timestamp)
(td (a (@ (href ,(simple-format
#f "~Abuild/~A"
(td (a (@ (href ,(build-server-link-url
build-server-url
(string-drop
derivation-file-name
(string-length "/gnu/store/")))))
build-server-build-id
derivation-file-name)))
"View build on " ,build-server-url)))))
builds)))))))))