summary refs log tree commit diff
path: root/bin
diff options
context:
space:
mode:
authorArun Isaac2022-03-17 15:58:35 +0530
committerArun Isaac2022-03-18 16:23:42 +0530
commitbc340c9a1b6e2f2cae79eefab990958a29c0b3d8 (patch)
treefb68a0fdc2f652862fbd0ee78c9fcf2da38155a4 /bin
parentf52ad25548bb142755a9d18a925b7d9d161d0d55 (diff)
downloadtissue-bc340c9a1b6e2f2cae79eefab990958a29c0b3d8.tar.gz
tissue-bc340c9a1b6e2f2cae79eefab990958a29c0b3d8.tar.lz
tissue-bc340c9a1b6e2f2cae79eefab990958a29c0b3d8.zip
issue: Rename issue-open to issue-open?.
issue-open returns a boolean. So, it makes sense to name it like a
predicate.

* bin/tissue (tissue-list): Replace issue-open with issue-open?.
* tissue/issue.scm (tissue): Export issue-open? instead of issue-open.
(<issue>): Rename issue-open to issue-open?.
* tissue/web.scm (issue-listing): Replace issue-open with issue-open?.
Diffstat (limited to 'bin')
-rwxr-xr-xbin/tissue2
1 files changed, 1 insertions, 1 deletions
diff --git a/bin/tissue b/bin/tissue
index c0514fb..9273482 100755
--- a/bin/tissue
+++ b/bin/tissue
@@ -257,7 +257,7 @@ List issues.
                (list-transduce (compose (tenumerate 1)
                                         (tfilter (match-lambda
                                                    ((_ . issue)
-                                                    (and (issue-open issue)
+                                                    (and (issue-open? issue)
                                                          (or (not (assq 'assigned args))
                                                              (member (assq-ref args 'assigned)
                                                                      (issue-assigned issue)))))))