Fix: (org-ql--sanity-check-form) Use pcase

This commit is contained in:
Adam Porter 2023-03-09 02:47:23 -06:00
parent 2bc327d85f
commit 5c5a15a09b

View file

@ -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?"))))))