aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorKenichi Handa1997-02-27 08:01:34 +0000
committerKenichi Handa1997-02-27 08:01:34 +0000
commit719c80be4339bc3ed564640b95e49c161c6b7dfb (patch)
tree5bb6520a39fe2023351076a419f46a5e1442aa5d /src
parentb65dbda39090819a00f7bcce5f6321d876793645 (diff)
downloademacs-719c80be4339bc3ed564640b95e49c161c6b7dfb.tar.gz
emacs-719c80be4339bc3ed564640b95e49c161c6b7dfb.zip
(Finsert_file_contents, Fwrite_region): Do not perform
character code conversion if enable-multibyte-characters is nil.
Diffstat (limited to 'src')
-rw-r--r--src/fileio.c6
1 files changed, 4 insertions, 2 deletions
diff --git a/src/fileio.c b/src/fileio.c
index c7c0111dbad..b925c18c41b 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -3059,7 +3059,9 @@ This does code conversion according to the value of\n\
3059 /* Decide the coding-system of the file. */ 3059 /* Decide the coding-system of the file. */
3060 { 3060 {
3061 Lisp_Object val = Vcoding_system_for_read; 3061 Lisp_Object val = Vcoding_system_for_read;
3062 if (NILP (val)) 3062 if (NILP (current_buffer->enable_multibyte_characters))
3063 val = Qnil;
3064 else if (NILP (val))
3063 { 3065 {
3064 Lisp_Object args[6], coding_systems; 3066 Lisp_Object args[6], coding_systems;
3065 3067
@@ -3622,7 +3624,7 @@ This does code conversion according to the value of\n\
3622 { 3624 {
3623 Lisp_Object val; 3625 Lisp_Object val;
3624 3626
3625 if (auto_saving) 3627 if (auto_saving || NILP (current_buffer->enable_multibyte_characters))
3626 val = Qnil; 3628 val = Qnil;
3627 else if (!NILP (Vcoding_system_for_write)) 3629 else if (!NILP (Vcoding_system_for_write))
3628 val = Vcoding_system_for_write; 3630 val = Vcoding_system_for_write;