gnbug: Print only open bugs in issue listing.

* gnbug (gnbug-list): Print only open bugs in issue listing.
* README.gmi (gnbug): Update documentation.

1 files changed, 4 insertions, 3 deletions

diff --git a/gnbug b/gnbug
index c57f717..f884c2a 100755
--- a/gnbug
+++ b/gnbug
@@ -266,9 +266,10 @@ terminal."
             (list-transduce (compose (tenumerate 1)
                                      (tfilter (match-lambda
                                                 ((_ . issue)
-                                                 (or (not (assq 'assigned args))
-                                                     (member (assq-ref args 'assigned)
-                                                             (issue-assigned issue))))))
+                                                 (and (issue-open issue)
+                                                      (or (not (assq 'assigned args))
+                                                          (member (assq-ref args 'assigned)
+                                                                  (issue-assigned issue)))))))
                                      (tlog (match-lambda*
                                              ((_ (index . issue))
                                               (format #t "~a ~a ~a ~a~a~a~%"