emacs-diffs
[Top][All Lists]
Advanced

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



reply via email to

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