summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--mumi/web/view/html.scm7
1 files changed, 7 insertions, 0 deletions
diff --git a/mumi/web/view/html.scm b/mumi/web/view/html.scm
index 3fb8177..b251283 100644
--- a/mumi/web/view/html.scm
+++ b/mumi/web/view/html.scm
@@ -615,6 +615,13 @@ M7 1C3.14 1 0 4.14 0 8\
s3.14 7 7 7 7-3.14 7-7-3.14-7-7-7z\
m1 3H6v5h2V4zm0 6H6v2h2v-2z")))))
'())
+ ,(or (and=> (bug-tags bug)
+ (lambda (tag)
+ `(span
+ (@ (class ,(string-append "badge badge-info mr-2 "
+ tag)))
+ ,tag)))
+ '())
,(if id
`(a (@ (href ,(string-append "/" id)))
,(bug-subject* bug))