(jka-compr-insert-file-contents):

If enable-multibyte-characters is nil, decode as raw-text.

(jka-compr-insert-file-contents):
If enable-multibyte-characters is nil, decode as raw-text.
bab00368 · Richard M. Stallman · a59b172a · bab00368
Commit bab00368 authored Dec 21, 1997 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 0 deletions

lisp/jka-compr.el lisp/jka-compr.el +4 -0

No files found.
--- a/lisp/jka-compr.el
+++ b/lisp/jka-compr.el
@@ -504,6 +504,10 @@ There should be no more than seven characters after the final `/'."
 	      size start
              (coding-system-for-read
 	       (or coding-system-for-read
+		   ;; If multibyte characters are disabled,
+		   ;; don't do that conversion.
+		   (and (null enable-multibyte-characters)
+			'raw-text)
 		   (let ((tail file-coding-system-alist)
 			 (newfile
 			  (jka-compr-byte-compiler-base-file-name file))