[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[no subject]
From: |
Ludovic Courtès |
Date: |
Mon, 12 Jun 2023 17:29:43 -0400 (EDT) |
branch: master
commit 7d9d7c843d68e7613bab714c5d5806e027e450c1
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Mon Jun 12 22:20:28 2023 +0200
templates: Evaluation dashboard links to evaluation page.
* src/cuirass/templates.scm (evaluation-dashboard): Link to evaluation
page.
---
src/cuirass/templates.scm | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/src/cuirass/templates.scm b/src/cuirass/templates.scm
index d852ca0..b34beb9 100644
--- a/src/cuirass/templates.scm
+++ b/src/cuirass/templates.scm
@@ -1883,7 +1883,10 @@ text-dark d-flex position-absolute w-100"))
(ul (@ (class "pagination pagination-sm"))
(li
(p (@ (class "lead mb-0 mr-3"))
- ,(format #f "Dashboard for evaluation #~a" evaluation)))
+ "Dashboard for "
+ (a (@ (href ,(string-append "/eval/"
+ (number->string evaluation))))
+ "evaluation #" ,(number->string evaluation))))
(li (@ (class
,(string-append "page-item "
(if prev-eval