1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00

(byte-compile-file): Bind default-major-mode to avoid randomness.

This commit is contained in:
Richard M. Stallman 1995-02-25 23:27:09 +00:00
parent ac8f8f7d8c
commit a096f13fc6

View file

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