From 5c5a15a09b5fe0773fabbdc2f55643e9d4b5e847 Mon Sep 17 00:00:00 2001
From: Adam Porter <adam@alphapapa.net>
Date: Thu, 9 Mar 2023 02:47:23 -0600
Subject: [PATCH] Fix: (org-ql--sanity-check-form) Use pcase

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

diff --git a/org-ql.el b/org-ql.el
index d602e60..1043809 100644
--- a/org-ql.el
+++ b/org-ql.el
@@ -768,7 +768,7 @@ be coalesced."
   "Signal error if any forms in FORM do not have preconditions met.
 Or, when possible, fix the problem."
   (cl-flet ((check (symbol)
-                   (cl-case symbol
+                   (pcase symbol
                      ('done (unless org-done-keywords
                               ;; NOTE: This check needs to be done from within the Org buffer being checked.
                               (error "Variable `org-done-keywords' is nil.  Are you running this from an Org buffer?"))))))