summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArun Isaac2022-03-17 17:36:31 +0530
committerArun Isaac2022-03-18 16:24:08 +0530
commit5ca60b9297b551016ece6653e00d2a6f3f6f438e (patch)
treed4ebec4e715c150254c227c50bc1cbcd14bfdab3
parent15e9daaac9af2b2ed6dc34979dd43ab4e172bb72 (diff)
downloadtissue-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.scm7
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)