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

1995-02-25 23:27:09 +00:00
parent ac8f8f7d8c
commit a096f13fc6
1 changed files with 1 additions and 0 deletions
--- 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)))