# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 902466276 0
# Node ID 436499b7a769edbc12fc8602c398bc7f43a57151
# Parent  e89aad442cf79bfafee829c824d3ea41608646ab
(internal_self_insert): If enable-multibyte-characters is
nil, convert a multibyte character to unibyte appropriately.

diff -r e89aad442cf7 -r 436499b7a769 src/cmds.c
--- a/src/cmds.c	Fri Aug 07 04:36:17 1998 +0000
+++ b/src/cmds.c	Fri Aug 07 05:04:36 1998 +0000
@@ -356,8 +356,13 @@
       len = CHAR_STRING (c, workbuf, str);
     }
   else
-    workbuf[0] = c, str = workbuf, len = 1;
-
+    {
+      workbuf[0] = (SINGLE_BYTE_CHAR_P (c)
+		    ? c
+		    : multibyte_char_to_unibyte (c, Qnil));
+      str = workbuf;
+      len = 1;
+    }
   if (!NILP (overwrite)
       && PT < ZV)
     {