summary refs log tree commit diff
diff options
context:
space:
mode:
authorArun Isaac2022-06-25 16:16:29 +0530
committerArun Isaac2022-06-25 16:16:29 +0530
commita3f79deff76b7736b63940e5c43b3de177142424 (patch)
tree5d568089ee260784e32933020afaf4d99f1a28f3
parentd1bd37eb16b3dfb81e2254f6c9c3cb86a0f68b01 (diff)
downloadtissue-a3f79deff76b7736b63940e5c43b3de177142424.tar.gz
tissue-a3f79deff76b7736b63940e5c43b3de177142424.tar.lz
tissue-a3f79deff76b7736b63940e5c43b3de177142424.zip
bin: Handle blank search queries as a special case.
* bin/tissue (tissue-search): Handle blank search queries as a special
case.
-rwxr-xr-xbin/tissue7
1 files changed, 4 insertions, 3 deletions
diff --git a/bin/tissue b/bin/tissue
index f4a6532..b1c90f2 100755
--- a/bin/tissue
+++ b/bin/tissue
@@ -223,9 +223,10 @@ Search issues using SEARCH-QUERY.
                 (query (parse-query
                         ;; If issue state is not mentioned in query,
                         ;; assume is:open.
-                        (if (string-contains-ci query-string "is:")
-                            query-string
-                            (format #f "is:open AND (~a)" query-string))
+                        (cond
+                         ((string-null? query-string) "is:open")
+                         ((string-contains-ci query-string "is:") query-string)
+                         (else (format #f "is:open AND (~a)" query-string)))
                         #:stemmer stemmer
                         #:prefixes '(("title" . "S")
                                      ("creator" . "A")