From 4256e89ff4957c17da49ff05fbf208473f9ed0f9 Mon Sep 17 00:00:00 2001
From: Jeff Filipovits <jrfilipovits@gmail.com>
Date: Tue, 7 Jan 2020 08:02:50 -0500
Subject: [PATCH] if `sort' is not a list, existing code will always return
 true

---
 org-ql.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/org-ql.el b/org-ql.el
index 9f7d939..158b09d 100644
--- a/org-ql.el
+++ b/org-ql.el
@@ -242,7 +242,7 @@ returns nil or non-nil."
     (pcase sort
       (`nil items)
       ((or 'date 'deadline 'scheduled 'todo 'priority 'random
-           (guard (cl-loop for elem in sort
+           (guard (cl-loop for elem in (-list sort)
                            always (memq elem '(date deadline scheduled todo priority random)))))
        ;; Default sorting functions
        (org-ql--sort-by items (-list sort)))