commit 2aa746caa9057b3ff5406c962cbd9f2ac00d2ab8
parent 9ae04dfd86745a9c39c26219e18ab7fcb6286eac
Author: Natasha Kerensikova <natgh@instinctive.eu>
Date: Sat, 29 Aug 2026 18:16:56 +0000
Selections in CGI report link to the respective page
Diffstat:
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/src/cgi.scm b/src/cgi.scm
@@ -1019,7 +1019,8 @@ END-OF-CSS
(if (null? diff) '()
`((table
,@(map (lambda (line)
- `(tr (td ,(conc "Selection #" (car line)))
+ `(tr (td (a (@ (href ,(conc "selection/" (car line))))
+ ,(conc "Selection #" (car line))))
(td (@ (title ,(list-ref line 1))) ,(list-ref line 2))
(td ,(->string (list-ref line 3)))
(td ,(conc (if (positive? (list-ref line 4)) "(+" "(")