diff options
| -rw-r--r-- | tissue/search.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tissue/search.scm b/tissue/search.scm index 934b2bc..eb325a4 100644 --- a/tissue/search.scm +++ b/tissue/search.scm @@ -20,6 +20,7 @@ #:use-module (srfi srfi-1) #:use-module (tissue document) #:use-module (tissue issue) + #:use-module (tissue utils) #:use-module (xapian wrap) #:use-module ((xapian xapian) #:renamer (lambda (symbol) (case symbol @@ -31,7 +32,7 @@ (define (parse-query search-query) "Parse SEARCH-QUERY and return a xapian Query object." - (if (string-null? search-query) + (if (string-blank? search-query) (Query-MatchAll) (xapian:parse-query search-query #:stemmer (make-stem "en") |