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.
This commit is contained in:
Basil L. Contovounesios 2021-03-03 12:49:31 +00:00
parent 88ca2280ba
commit a2ae2d2860

View file

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