[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-25 c4b20fc: pcase.el: Fix edebugging of backquoted c
From: |
Johan Bockgard |
Subject: |
[Emacs-diffs] emacs-25 c4b20fc: pcase.el: Fix edebugging of backquoted cons patterns |
Date: |
Mon, 16 Nov 2015 22:50:23 +0000 |
branch: emacs-25
commit c4b20fc936736053a0a07e060a1b8ff46c48e432
Author: Johan Bockgård <address@hidden>
Commit: Johan Bockgård <address@hidden>
pcase.el: Fix edebugging of backquoted cons patterns
* lisp/emacs-lisp/pcase.el (pcase-QPAT): Fix edebugging of backquoted
cons patterns. (Bug#21920)
---
lisp/emacs-lisp/pcase.el | 4 +++-
1 files changed, 3 insertions(+), 1 deletions(-)
diff --git a/lisp/emacs-lisp/pcase.el b/lisp/emacs-lisp/pcase.el
index bf6550d..c87c231 100644
--- a/lisp/emacs-lisp/pcase.el
+++ b/lisp/emacs-lisp/pcase.el
@@ -865,8 +865,10 @@ Otherwise, it defers to REST which is a list of branches
of the form
(def-edebug-spec
pcase-QPAT
+ ;; Cf. edebug spec for `backquote-form' in edebug.el.
(&or ("," pcase-PAT)
- (pcase-QPAT . pcase-QPAT)
+ (pcase-QPAT [&rest [¬ ","] pcase-QPAT]
+ . [&or nil pcase-QPAT])
(vector &rest pcase-QPAT)
sexp))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-25 c4b20fc: pcase.el: Fix edebugging of backquoted cons patterns,
Johan Bockgard <=