[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master a2ae2d2: Fix pcase dontcare pattern in cl--sm-macroexpand
From: |
Basil L. Contovounesios |
Subject: |
master a2ae2d2: Fix pcase dontcare pattern in cl--sm-macroexpand |
Date: |
Wed, 3 Mar 2021 20:04:58 -0500 (EST) |
branch: master
commit a2ae2d28606cef40aa7d076febb0295fcc44be67
Author: Basil L. Contovounesios <contovob@tcd.ie>
Commit: Basil L. Contovounesios <contovob@tcd.ie>
Fix pcase dontcare pattern in cl--sm-macroexpand
For discussion, see the following thread:
https://lists.gnu.org/r/emacs-devel/2021-03/msg00119.html
* lisp/emacs-lisp/cl-macs.el (cl--sm-macroexpand): Fix recently
uncovered use of old name for pcase--dontcare.
---
lisp/emacs-lisp/cl-macs.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el
index 91146c4..c38dc44 100644
--- a/lisp/emacs-lisp/cl-macs.el
+++ b/lisp/emacs-lisp/cl-macs.el
@@ -2298,7 +2298,7 @@ of `cl-symbol-macrolet' to additionally expand symbol
macros."
;; The behavior of CL made sense in a dynamically scoped
;; language, but nowadays, lexical scoping semantics is more often
;; expected.
- (`(,(or 'let 'let*) . ,(or `(,bindings . ,body) dontcare))
+ (`(,(or 'let 'let*) . ,(or `(,bindings . ,body) pcase--dontcare))
(let ((nbs ()) (found nil))
(dolist (binding bindings)
(let* ((var (if (symbolp binding) binding (car binding)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master a2ae2d2: Fix pcase dontcare pattern in cl--sm-macroexpand,
Basil L. Contovounesios <=