aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMark Oteiza2017-05-13 21:40:23 -0400
committerMark Oteiza2017-05-13 21:40:23 -0400
commit4e0887556776086a0f508c394ab56cac5e1a4c8d (patch)
tree0b296b474179f62e0dec2c63c8b66a29b079c038
parent78fe5abc11c9ff237615d6884aed159229377cc5 (diff)
downloademacs-4e0887556776086a0f508c394ab56cac5e1a4c8d.tar.gz
emacs-4e0887556776086a0f508c394ab56cac5e1a4c8d.zip
; Revert "Adjust the edebug spec of if-let*"
This reverts commit fd4b83ca7c20a68060772ec13aadbe29db612b3f.
-rw-r--r--lisp/emacs-lisp/subr-x.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el
index 440213eb38a..8a955277fed 100644
--- a/lisp/emacs-lisp/subr-x.el
+++ b/lisp/emacs-lisp/subr-x.el
@@ -128,8 +128,7 @@ In the special case you only want to bind a single value,
128VARLIST can just be a plain tuple. 128VARLIST can just be a plain tuple.
129\n(fn VARLIST THEN ELSE...)" 129\n(fn VARLIST THEN ELSE...)"
130 (declare (indent 2) 130 (declare (indent 2)
131 (debug ([&or (&rest &or symbolp (gate symbolp &optional form)) 131 (debug ([&or (&rest [&or symbolp (symbolp form)]) (symbolp form)]
132 (symbolp form)]
133 form body))) 132 form body)))
134 (when (and (<= (length bindings) 2) 133 (when (and (<= (length bindings) 2)
135 (not (listp (car bindings)))) 134 (not (listp (car bindings))))