diff options
author | Christopher Baines <mail@cbaines.net> | 2023-09-26 18:42:32 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2023-09-26 19:24:04 +0100 |
commit | 71c0888ed6cd6fbcb4b860baa54e43113288ed36 (patch) | |
tree | dee18c4b5b15a560110c8d4e04b2c175c5be0927 /guix-qa-frontpage/view | |
parent | 4db90aa5ceb966071971eb5f2f1d8126e1557cba (diff) | |
download | qa-frontpage-71c0888ed6cd6fbcb4b860baa54e43113288ed36.tar qa-frontpage-71c0888ed6cd6fbcb4b860baa54e43113288ed36.tar.gz |
Show the guix usertags on the issue page
Diffstat (limited to 'guix-qa-frontpage/view')
-rw-r--r-- | guix-qa-frontpage/view/issue.scm | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/guix-qa-frontpage/view/issue.scm b/guix-qa-frontpage/view/issue.scm index 0edb034..5f4dd9d 100644 --- a/guix-qa-frontpage/view/issue.scm +++ b/guix-qa-frontpage/view/issue.scm @@ -23,6 +23,9 @@ (define tagged-as-moreinfo? (member "moreinfo" mumi-tags)) + (define debbugs-usertags + (assq-ref series 'usertags)) + (define derivation-changes-counts (assq-ref derivation-changes 'counts)) @@ -268,7 +271,13 @@ div.bad { (lambda (tag) `(span (@ (class "tag")) ,tag)) - (or mumi-tags '()))) + (or mumi-tags '())) + ,@(map + (lambda (tag) + `(span (@ (class "tag")) + "(guix) " + ,tag)) + (or debbugs-usertags '()))) (ul ,@(map |