diff options
author | Richard M. Stallman <rms@gnu.org> | 1997-12-21 02:26:48 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1997-12-21 02:26:48 +0000 |
commit | bab0036837b17b611b6a5e9ef5e40f6abf8c3546 (patch) | |
tree | 093f42528e311429fce821853ee0066e0bae041d /lisp/jka-compr.el | |
parent | a59b172a766598760cb37881bca1c480dd597d1f (diff) | |
download | emacs-bab0036837b17b611b6a5e9ef5e40f6abf8c3546.tar.gz |
(jka-compr-insert-file-contents):
If enable-multibyte-characters is nil, decode as raw-text.
Diffstat (limited to 'lisp/jka-compr.el')
-rw-r--r-- | lisp/jka-compr.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/jka-compr.el b/lisp/jka-compr.el index 58453869f92..f66b84291c2 100644 --- 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)) |