jiri/org-ql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source
This commit is contained in:
Adam Porter 2023-03-09 02:47:23 -06:00
parent 2bc327d85f
commit 5c5a15a09b
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
org-ql.el
View file

@ -768,7 +768,7 @@ be coalesced."
"Signal error if any forms in FORM do not have preconditions met. "Signal error if any forms in FORM do not have preconditions met.
Or, when possible, fix the problem." Or, when possible, fix the problem."
(cl-flet ((check (symbol) (cl-flet ((check (symbol)
(cl-case symbol (pcase symbol
('done (unless org-done-keywords ('done (unless org-done-keywords
;; NOTE: This check needs to be done from within the Org buffer being checked. ;; 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?")))))) (error "Variable `org-done-keywords' is nil. Are you running this from an Org buffer?"))))))