procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/emacs-lisp/subr-x.el (if-let*): Fix Edebug spec (Bug#24748)

Browse source
This commit is contained in:
Gemini Lasswell 2017-02-04 16:16:11 -08:00 • committed by Mark Oteiza
parent 071680b734
commit 5401820672
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/emacs-lisp/subr-x.el
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. VARLIST can just be a plain tuple.
\n(fn VARLIST THEN ELSE...)" \n(fn VARLIST THEN ELSE...)"
(declare (indent 2) (declare (indent 2)
(debug ([&or (&rest (symbolp form)) (symbolp form)] form body))) (debug ([&or (&rest [&or symbolp (symbolp form)]) (symbolp form)]
form body)))
(when (and (<= (length bindings) 2) (when (and (<= (length bindings) 2)
(not (listp (car bindings)))) (not (listp (car bindings))))
;; Adjust the single binding case ;; Adjust the single binding case