[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))))