Adjust the edebug spec of if-let*

This was fixed in Bug#24748, but now looking more closely, using gate in
the spec seems correct.  See (info "(elisp) Backtracking").
* lisp/emacs-lisp/subr-x.el (if-let*): Use gate in edebug spec.
This commit is contained in:
Mark Oteiza 2017-04-08 11:30:36 -04:00
parent 1c69215c51
commit fd4b83ca7c

View file

@ -126,7 +126,8 @@ In the special case you only want to bind a single value,
VARLIST can just be a plain tuple.
\n(fn VARLIST THEN ELSE...)"
(declare (indent 2)
(debug ([&or (&rest [&or symbolp (symbolp form)]) (symbolp form)]
(debug ([&or (&rest &or symbolp (gate symbolp &optional form))
(symbolp form)]
form body)))
(when (and (<= (length bindings) 2)
(not (listp (car bindings))))