summaryrefslogtreecommitdiff
path: root/src/fileio.c
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>1997-02-27 08:01:34 +0000
committerKenichi Handa <handa@m17n.org>1997-02-27 08:01:34 +0000
commit719c80be4339bc3ed564640b95e49c161c6b7dfb (patch)
tree5bb6520a39fe2023351076a419f46a5e1442aa5d /src/fileio.c
parentb65dbda39090819a00f7bcce5f6321d876793645 (diff)
downloademacs-719c80be4339bc3ed564640b95e49c161c6b7dfb.tar.gz
(Finsert_file_contents, Fwrite_region): Do not perform
character code conversion if enable-multibyte-characters is nil.
Diffstat (limited to 'src/fileio.c')
-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\
/* Decide the coding-system of the file. */
{
Lisp_Object val = Vcoding_system_for_read;
- if (NILP (val))
+ if (NILP (current_buffer->enable_multibyte_characters))
+ val = Qnil;
+ else if (NILP (val))
{
Lisp_Object args[6], coding_systems;
@@ -3622,7 +3624,7 @@ This does code conversion according to the value of\n\
{
Lisp_Object val;
- if (auto_saving)
+ if (auto_saving || NILP (current_buffer->enable_multibyte_characters))
val = Qnil;
else if (!NILP (Vcoding_system_for_write))
val = Vcoding_system_for_write;