changeset 20497:0d0951bf17fa

(jka-compr-insert-file-contents): If enable-multibyte-characters is nil, decode as raw-text.
author Richard M. Stallman <rms@gnu.org>
date Sun, 21 Dec 1997 02:26:48 +0000
parents b2536e1685e9
children 22dd2d861e36
files lisp/jka-compr.el
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/jka-compr.el	Sun Dec 21 02:19:17 1997 +0000
+++ b/lisp/jka-compr.el	Sun Dec 21 02:26:48 1997 +0000
@@ -504,6 +504,10 @@
 	      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))