diff options
| author | Christopher Baines <mail@cbaines.net> | 2023-04-30 18:54:45 +0200 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2023-04-30 18:54:45 +0200 |
| commit | eb6aec6f07eec089c56ac345f513da4ed3c115a0 (patch) | |
| tree | 84d7aea4c9119d15a005af0cb358829664ade85a | |
| parent | 6e73bc321c16eb141797c04ef941806481c8ae71 (diff) | |
| download | bffe-eb6aec6f07eec089c56ac345f513da4ed3c115a0.tar bffe-eb6aec6f07eec089c56ac345f513da4ed3c115a0.tar.gz | |
Link to the build and agent pages from the activity page
| -rw-r--r-- | assets/js/activity.js | 4 | ||||
| -rw-r--r-- | bffe/view/activity.scm | 23 |
2 files changed, 18 insertions, 9 deletions
diff --git a/assets/js/activity.js b/assets/js/activity.js index 719ec47..1f98ae8 100644 --- a/assets/js/activity.js +++ b/assets/js/activity.js @@ -250,7 +250,9 @@ function agentBuildsAllocatedHandler(e) { const drv = build.derivation_name.slice(44, -4); buildElement.innerHTML = ` -<span class="monospace" style="display:block;">${drv}</span> +<a href="/build/${build.uuid}" style="display:block;"> + <span class="monospace">${drv}</span> +</a> `; build.tags.sort(function(a, b) { diff --git a/bffe/view/activity.scm b/bffe/view/activity.scm index 484aa36..669ebe2 100644 --- a/bffe/view/activity.scm +++ b/bffe/view/activity.scm @@ -247,8 +247,11 @@ table tr:nth-child(even) { ,(assoc-ref (assoc-ref agent "allocation_plan") "count")) - (h4 (@ (style "display: block;")) - ,(assoc-ref agent "name")) + (a (@ (href ,(string-append + "/agent/" + (assoc-ref agent "uuid")))) + (h4 (@ (style "display: block;")) + ,(assoc-ref agent "name"))) (div (@ (class "agent-builds") (id @@ -280,12 +283,16 @@ table tr:nth-child(even) { (if (> index 3) " hidden" "")))) - (span - (@ (class "monospace") - (style "display: block;")) - ,(abbreviate-derivation - (or (assoc-ref build "derivation_name") - (assoc-ref build "derivation-name")))) + (a (@ (href + ,(string-append + "/build/" + (assoc-ref build "uuid"))) + (style "display: block;")) + (span + (@ (class "monospace")) + ,(abbreviate-derivation + (or (assoc-ref build "derivation_name") + (assoc-ref build "derivation-name"))))) ,@(append-map (lambda (tag) `((span |