Fix: (--defpred) Debug declaration

To work with preds with aliases.
This commit is contained in:
Adam Porter 2019-10-07 12:37:34 -05:00
parent acf8e0e0fb
commit 7e11145bad

View file

@ -124,7 +124,7 @@ docstring. BODY is the body of the predicate.
Predicates will be called with point on the beginning of an Org
heading and should return non-nil if the heading's entry is a
match."
(declare (debug (symbolp listp stringp def-body))
(declare (debug ([&or symbolp listp] listp stringp def-body))
(indent defun))
(let* ((aliases (when (listp name)
(cdr name)))