summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-02-25 23:27:09 +0000
committerRichard M. Stallman <rms@gnu.org>1995-02-25 23:27:09 +0000
commita096f13fc6380cb037bd487426bd3e4e799337db (patch)
treeaa3b1baf6990ddd53ddeca2abc1a76e0cb2e6370 /lisp/emacs-lisp
parentac8f8f7d8cf769319a8d21b4d04e323f3b4d55b5 (diff)
downloademacs-a096f13fc6380cb037bd487426bd3e4e799337db.tar.gz
emacs-a096f13fc6380cb037bd487426bd3e4e799337db.tar.bz2
emacs-a096f13fc6380cb037bd487426bd3e4e799337db.zip
(byte-compile-file): Bind default-major-mode to avoid randomness.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/bytecomp.el1
1 files changed, 1 insertions, 0 deletions
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)))