From: Gemini Lasswell <gazally@runbox.com>
Date: Sun, 5 Feb 2017 00:16:11 +0000 (-0800)
Subject: * lisp/emacs-lisp/subr-x.el (if-let*): Fix Edebug spec (Bug#24748)
X-Git-Tag: emacs-26.0.90~803
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5401820672c650f47bf055ebbf3cc590f90cb05a;p=emacs.git

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

diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el
index f7a846927c0..1d729f94092 100644
--- a/lisp/emacs-lisp/subr-x.el
+++ b/lisp/emacs-lisp/subr-x.el
@@ -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 (symbolp form)) (symbolp form)] form body)))
+           (debug ([&or (&rest [&or symbolp (symbolp form)]) (symbolp form)]
+                   form body)))
   (when (and (<= (length bindings) 2)
              (not (listp (car bindings))))
     ;; Adjust the single binding case