diff options
author | Arun Isaac | 2022-03-17 17:36:31 +0530 |
---|---|---|
committer | Arun Isaac | 2022-03-18 16:24:08 +0530 |
commit | 5ca60b9297b551016ece6653e00d2a6f3f6f438e (patch) | |
tree | d4ebec4e715c150254c227c50bc1cbcd14bfdab3 | |
parent | 15e9daaac9af2b2ed6dc34979dd43ab4e172bb72 (diff) | |
download | tissue-5ca60b9297b551016ece6653e00d2a6f3f6f438e.tar.gz tissue-5ca60b9297b551016ece6653e00d2a6f3f6f438e.tar.lz tissue-5ca60b9297b551016ece6653e00d2a6f3f6f438e.zip |
web: Display task lists in web issue listings.
* tissue/web.scm (issue-list-item-markup-writer-action): Display task
lists.
-rw-r--r-- | tissue/web.scm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/tissue/web.scm b/tissue/web.scm index f06f58d..8406afc 100644 --- a/tissue/web.scm +++ b/tissue/web.scm @@ -155,7 +155,12 @@ NEW-EXTENSION." (format ", last updated ~a by ~a" (markup-option markup #:last-updated-relative-date) (markup-option markup #:last-updater)) - "")))))) + "") + (if (zero? (markup-option markup #:tasks)) + "" + (format "; ~a of ~a tasks done" + (markup-option markup #:completed-tasks) + (markup-option markup #:tasks)))))))) (markup-writer 'issue-list-item (find-engine 'html) |