From bc340c9a1b6e2f2cae79eefab990958a29c0b3d8 Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Thu, 17 Mar 2022 15:58:35 +0530 Subject: 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. (): Rename issue-open to issue-open?. * tissue/web.scm (issue-listing): Replace issue-open with issue-open?. --- bin/tissue | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'bin') 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))))))) -- cgit v1.2.3