From a3f79deff76b7736b63940e5c43b3de177142424 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Sat, 25 Jun 2022 16:16:29 +0530
Subject: bin: Handle blank search queries as a special case.

* bin/tissue (tissue-search): Handle blank search queries as a special
case.
---
 bin/tissue | 7 ++++---
 1 file 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")
-- 
cgit v1.2.3