Commit a096f13f authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

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

parent ac8f8f7d
......@@ -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)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment