templates: Failed evaluations link to their log.

* src/cuirass/templates.scm (evaluation-badges): Link to
/eval/ID/log/raw in the 'zero?' case.
This commit is contained in:
Ludovic Courtès 2019-10-23 15:46:10 +02:00
parent c8c34f8ee3
commit 80b6e89a7b
1 changed files with 5 additions and 4 deletions

View File

@ -257,10 +257,11 @@
;; an evaluation failed, assume that it failed when it produced zero
;; build jobs.
(if (zero? (+ succeeded failed scheduled))
`((span (@ (class "oi oi-x text-danger")
(title "Failed")
(aria-hidden "true"))
""))
`((a (@ (href "/eval/" ,(assq-ref evaluation #:id) "/log/raw")
(class "oi oi-x text-danger")
(title "Failed")
(aria-hidden "true"))
""))
`((a (@ (href "/eval/" ,(assq-ref evaluation #:id) "?status=succeeded")
(class "badge badge-success")
(title "Succeeded"))