diff options
| -rw-r--r-- | assets/css/screen.css | 7 | ||||
| -rw-r--r-- | mumi/web/view/html.scm | 10 |
2 files changed, 16 insertions, 1 deletions
diff --git a/assets/css/screen.css b/assets/css/screen.css index 012d359..45aea24 100644 --- a/assets/css/screen.css +++ b/assets/css/screen.css @@ -61,6 +61,13 @@ h2 { padding-bottom: 5px; } +ul.merged li { + display: inline-block; +} +ul.merged li + li:before { + content: ", "; +} + p { max-width: 70rem; } diff --git a/mumi/web/view/html.scm b/mumi/web/view/html.scm index 8cb811f..bff509f 100644 --- a/mumi/web/view/html.scm +++ b/mumi/web/view/html.scm @@ -338,7 +338,15 @@ range. The supported arguments are the same as for " ;; return value, because it swallows ;; non-ASCII characters. (sender-name (first messages)) - "."))) + ".") + ,@(if (bug-mergedwith bug) + `((ul (@ (class "merged")) + "Merged with: " + ,(map (lambda (id) + `(li (a (@ (href ,(string-append "/issue/" id))) + ,id))) + (string-split (bug-mergedwith bug) #\space)))) + '()))) (div (@ (class "row")) (div |