From 002c019c34eeb1cad4ce8f5ae721b1cdf22f0946 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 23 Nov 2012 16:49:13 -0500 Subject: * lisp/emacs-lisp/bytecomp.el (byte-compile-file): Setup default value for lexical-binding. Fixes: debbugs:12938 --- lisp/emacs-lisp/bytecomp.el | 3 +++ 1 file changed, 3 insertions(+) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 7534ce5eaca..df6a79d5196 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -1745,6 +1745,9 @@ The value is non-nil if there were no errors, nil if errors." ;; There may be a file local variable setting (bug#10419). (setq buffer-read-only nil filename buffer-file-name)) + ;; Don't inherit lexical-binding from caller (bug#12938). + (unless (local-variable-p 'lexical-binding) + (setq-local lexical-binding nil)) ;; Set the default directory, in case an eval-when-compile uses it. (setq default-directory (file-name-directory filename))) ;; Check if the file's local variables explicitly specify not to -- cgit v1.2.3