diff options
| author | Basil L. Contovounesios | 2021-03-03 12:49:31 +0000 |
|---|---|---|
| committer | Basil L. Contovounesios | 2021-03-04 00:57:28 +0000 |
| commit | a2ae2d28606cef40aa7d076febb0295fcc44be67 (patch) | |
| tree | c212d57cd20f17cc0da09965fd37bae931a0f726 | |
| parent | 88ca2280ba430ad2fa681c72cc6ba8216709e63f (diff) | |
| download | emacs-a2ae2d28606cef40aa7d076febb0295fcc44be67.tar.gz emacs-a2ae2d28606cef40aa7d076febb0295fcc44be67.zip | |
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.
| -rw-r--r-- | lisp/emacs-lisp/cl-macs.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index 91146c4d0ec..c38dc44ff60 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." | |||
| 2298 | ;; The behavior of CL made sense in a dynamically scoped | 2298 | ;; The behavior of CL made sense in a dynamically scoped |
| 2299 | ;; language, but nowadays, lexical scoping semantics is more often | 2299 | ;; language, but nowadays, lexical scoping semantics is more often |
| 2300 | ;; expected. | 2300 | ;; expected. |
| 2301 | (`(,(or 'let 'let*) . ,(or `(,bindings . ,body) dontcare)) | 2301 | (`(,(or 'let 'let*) . ,(or `(,bindings . ,body) pcase--dontcare)) |
| 2302 | (let ((nbs ()) (found nil)) | 2302 | (let ((nbs ()) (found nil)) |
| 2303 | (dolist (binding bindings) | 2303 | (dolist (binding bindings) |
| 2304 | (let* ((var (if (symbolp binding) binding (car binding))) | 2304 | (let* ((var (if (symbolp binding) binding (car binding))) |