From: Richard M. Stallman Date: Sat, 25 Feb 1995 23:27:09 +0000 (+0000) Subject: (byte-compile-file): Bind default-major-mode to avoid randomness. X-Git-Tag: emacs-19.34~5022 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a096f13fc6380cb037bd487426bd3e4e799337db;p=emacs.git (byte-compile-file): Bind default-major-mode to avoid randomness. --- diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index f0015b8309c..9d4f632a485 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -1194,6 +1194,7 @@ With prefix arg (noninteractively: 2nd arg), load the file after compiling." ;; Run hooks including the uncompression hook. ;; If they change the file name, then change it for the output also. (let ((buffer-file-name filename) + (default-major-mode 'emacs-lisp-mode) (enable-local-eval nil)) (normal-mode) (setq filename buffer-file-name)))