emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master fd4b83c 2/3: Adjust the edebug spec of if-let*


From: Mark Oteiza
Subject: [Emacs-diffs] master fd4b83c 2/3: Adjust the edebug spec of if-let*
Date: Sat, 8 Apr 2017 11:37:01 -0400 (EDT)

branch: master
commit fd4b83ca7c20a68060772ec13aadbe29db612b3f
Author: Mark Oteiza <address@hidden>
Commit: Mark Oteiza <address@hidden>

    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.
---
 lisp/emacs-lisp/subr-x.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el
index 1d729f9..5ad482d 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 [&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))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]