aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service/web/revision
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2019-12-22 15:23:03 +0000
committerChristopher Baines <mail@cbaines.net>2019-12-22 15:23:03 +0000
commit0b0d734a97879728af06a58572994bd32cae6ff6 (patch)
tree8c1b2b5dad417ce9503fe201f968d22c52f48848 /guix-data-service/web/revision
parent14b79936369c2755d9a98d2c3ca839081b20833d (diff)
downloaddata-service-0b0d734a97879728af06a58572994bd32cae6ff6.tar
data-service-0b0d734a97879728af06a58572994bd32cae6ff6.tar.gz
Add links from the builds pages to the pages for individual builds
Diffstat (limited to 'guix-data-service/web/revision')
-rw-r--r--guix-data-service/web/revision/html.scm7
1 files changed, 6 insertions, 1 deletions
diff --git a/guix-data-service/web/revision/html.scm b/guix-data-service/web/revision/html.scm
index 127005f..5d166c9 100644
--- a/guix-data-service/web/revision/html.scm
+++ b/guix-data-service/web/revision/html.scm
@@ -1248,7 +1248,12 @@ figure {
timestamp status)
`(tr
(td (@ (class "text-center"))
- ,(build-status-span status))
+ (a (@ (href
+ ,(simple-format
+ #f "/build-server/~A/build?derivation_file_name=~A"
+ (assoc-ref build-server-options build-server-url)
+ derivation-file-name)))
+ ,(build-status-span status)))
(td (a (@ (href ,derivation-file-name))
,(display-store-item-short derivation-file-name)))
(td ,timestamp)