Fix: (category) Add normalizer for alias

This commit is contained in:
Adam Porter 2022-12-25 12:09:50 -06:00
parent 8dae879841
commit 36ff9854ce

View file

@ -1327,6 +1327,8 @@ result form."
(org-ql-defpred (category c) (&rest categories)
"Return non-nil if current heading is in one or more of CATEGORIES (a list of strings)."
:normalizers ((`(,predicate-names . ,rest)
`(category ,@rest)))
:body (when-let ((category (org-get-category (point))))
(cl-typecase categories
(null t)