diff options
| author | Stefan Kangas <stefankangas@gmail.com> | 2023-02-19 17:37:59 +0100 |
|---|---|---|
| committer | Stefan Kangas <stefankangas@gmail.com> | 2023-02-19 17:37:59 +0100 |
| commit | 9a6f22fd0b4123b8698348627d63bff05e65e58f (patch) | |
| tree | 5182737ba96d168c47527cfe6bb69be8ea3b6ffc /lisp/emacs-lisp | |
| parent | 32be128382f61fc732a6a952855950bde72c0412 (diff) | |
| parent | f5a99945b6f704c1de47511343248b22a6189bab (diff) | |
| download | emacs-9a6f22fd0b4123b8698348627d63bff05e65e58f.tar.gz emacs-9a6f22fd0b4123b8698348627d63bff05e65e58f.tar.bz2 emacs-9a6f22fd0b4123b8698348627d63bff05e65e58f.zip | |
Merge from origin/emacs-28
f5a99945b6f ; Update ChangeLog for Emacs 28.3
f7bd5ac5521 Update HISTORY for Emacs 28.3
# Conflicts:
# etc/NEWS
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/cconv.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/cconv.el b/lisp/emacs-lisp/cconv.el index 0154716627f..5f37db3fe9b 100644 --- a/lisp/emacs-lisp/cconv.el +++ b/lisp/emacs-lisp/cconv.el @@ -891,7 +891,7 @@ Returns a pair (LEXV . DYNV) of those vars actually used by FORM." (pcase expanded-form (`#'(lambda . ,cdr) cdr) (_ (cdr fun)))) - + (dynvars (delq nil (mapcar (lambda (b) (if (symbolp b) b)) env))) (fvs (cconv-fv expanded-form lexvars dynvars)) (newenv (nconc (mapcar (lambda (fv) (assq fv env)) (car fvs)) |