]> git.eshelyaron.com Git - emacs.git/commitdiff
Adjust the edebug spec of if-let*
authorMark Oteiza <mvoteiza@udel.edu>
Sat, 8 Apr 2017 15:30:36 +0000 (11:30 -0400)
committerMark Oteiza <mvoteiza@udel.edu>
Sat, 8 Apr 2017 15:36:56 +0000 (11:36 -0400)
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.

lisp/emacs-lisp/subr-x.el

index 1d729f9409299e0e2be54a974d65998bc224adc8..5ad482d1eac85460e0f31d25fbab0d4bb8a019cc 100644 (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))))