gnosis-select-by-tag: Use cl-assert

1 files changed, 1 insertions, 2 deletions

diff --git a/gnosis.el b/gnosis.el
index 48cc707..d29a16c 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -888,8 +888,7 @@ Optionally, add cusotm PROMPT."
 
 (defun gnosis-select-by-tag (input-tags)
   "Return note ID's for every note with INPUT-TAGS."
-  (unless (listp input-tags)
-    (error "`input-tags' need to be a list"))
+  (cl-assert (listp input-tags) t "Input tags must be a list")
   (cl-loop for (id tags) in (gnosis-select '[id tags] 'notes)
            when (and (cl-every (lambda (tag) (member tag tags)) input-tags)
 		     (not (gnosis-suspended-p id)))