From 8c91c82e3529a4a479864655a2ac76a90e7f12ad Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Wed, 19 Jun 2019 16:23:43 +0200 Subject: templates: Add link titles to evaluation badges. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * src/cuirass/templates.scm (evaluation-badges): Add ‘title’ attributes. --- src/cuirass/templates.scm | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'src') diff --git a/src/cuirass/templates.scm b/src/cuirass/templates.scm index 9ebdd2e..342fd13 100644 --- a/src/cuirass/templates.scm +++ b/src/cuirass/templates.scm @@ -254,13 +254,16 @@ (aria-hidden "true")) "")) `((a (@ (href "/eval/" ,(assq-ref evaluation #:id) "?status=succeeded") - (class "badge badge-success")) + (class "badge badge-success") + (title "Succeeded")) ,succeeded) (a (@ (href "/eval/" ,(assq-ref evaluation #:id) "?status=failed") - (class "badge badge-danger")) + (class "badge badge-danger") + (title "Failed")) ,failed) (a (@ (href "/eval/" ,(assq-ref evaluation #:id) "?status=pending") - (class "badge badge-secondary")) + (class "badge badge-secondary") + (title "Scheduled")) ,scheduled)))) '((em "In progress…")))) -- cgit v1.2.3