procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(byte-compile-file): Always read the file in multibyte mode

Browse source 
unless the file itself specifies unibyte mode.
This commit is contained in:
Richard M. Stallman 1998-04-23 21:24:29 +00:00
parent bed23cb24b
commit 746dd29821
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/emacs-lisp/bytecomp.el
View file

@ -9,7 +9,7 @@
;;; This version incorporates changes up to version 2.10 of the
;;; Zawinski-Furuseth compiler.
(defconst byte-compile-version "$Revision: 2.39 $")
(defconst byte-compile-version "$Revision: 2.40 $")
;; This file is part of GNU Emacs.
@ -1282,6 +1282,9 @@ The value is t if there were no errors, nil if errors."
(setq input-buffer (get-buffer-create " *Compiler Input*"))
(set-buffer input-buffer)
(erase-buffer)
;; Always compile an Emacs Lisp file as multibyte
;; unless the file itself forces unibyte with -*-coding: raw-text;-*-x
(set-buffer-multibyte t)
(insert-file-contents filename)
;; Run hooks including the uncompression hook.
;; If they change the file name, then change it for the output also.