# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1015846121 0
# Node ID 6b86cf30a0b9e4857a405bb8f538d6d675cb4cf8
# Parent  9ebe131ccd17c39450bf607e21c79463417defa4
(produce_chars): Set the variable `multibytep' correctly.
(decode_coding_gap): Set coding->dst_multibyte correctly.

diff -r 9ebe131ccd17 -r 6b86cf30a0b9 src/coding.c
--- a/src/coding.c	Mon Mar 11 11:28:06 2002 +0000
+++ b/src/coding.c	Mon Mar 11 11:28:41 2002 +0000
@@ -5092,7 +5092,6 @@
     }
   else
     {
-      int multibytep = coding->src_multibyte;
       unsigned char *src = coding->source;
       unsigned char *src_end = src + coding->src_bytes;
       Lisp_Object eol_type;
@@ -5103,6 +5102,7 @@
 	{
 	  if (coding->src_multibyte)
 	    {
+	      int multibytep = 1;
 	      int consumed_chars;
 
 	      while (1)
@@ -5141,6 +5141,7 @@
 	  else
 	    while (src < src_end)
 	      {
+		int multibytep = 1;
 		int c = *src++;
 
 		if (c == '\r')
@@ -5706,6 +5707,7 @@
   coding->dst_object = coding->src_object;
   coding->dst_pos = PT;
   coding->dst_pos_byte = PT_BYTE;
+  coding->dst_multibyte = ! NILP (current_buffer->enable_multibyte_characters);
 
   if (CODING_REQUIRE_DETECTION (coding))
     detect_coding (coding);