diff options
| author | Ricardo Wurmus <rekado@elephly.net> | 2018-09-01 08:54:03 +0200 |
|---|---|---|
| committer | Ricardo Wurmus <rekado@elephly.net> | 2018-09-01 08:54:03 +0200 |
| commit | bc672c2609af5e4d5f597235371f4e7a733cda79 (patch) | |
| tree | eb895666350a6c95432ae2fa2eca15dc1d0bdd18 | |
| parent | c1eac74b154cfeb12199393fd9f039b7593786fd (diff) | |
view: Add missing docstring.
| -rw-r--r-- | mumi/web/view/html.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/mumi/web/view/html.scm b/mumi/web/view/html.scm index 5b1a56d..4d8a1e1 100644 --- a/mumi/web/view/html.scm +++ b/mumi/web/view/html.scm @@ -30,6 +30,7 @@ list-of-matching-bugs)) (define (status-tag bug) + "Return a colored tag indicating the BUG status." (let ((status (if (bug-done bug) "Done" "Open"))) `(span (@ (class ,(string-append "status-tag " (string-downcase status)))) |