(internal_self_insert): If enable-multibyte-characters is

nil, convert a multibyte character to unibyte appropriately.

(internal_self_insert): If enable-multibyte-characters is
nil, convert a multibyte character to unibyte appropriately.
38b62842 · Kenichi Handa · e271fdb3 · 38b62842
Commit 38b62842 authored Aug 07, 1998 by Kenichi Handa
Hide whitespace changes
Inline Side-by-side

Showing with 7 additions and 2 deletions

src/cmds.c src/cmds.c +7 -2

No files found.
--- a/src/cmds.c
+++ b/src/cmds.c
@@ -356,8 +356,13 @@ internal_self_insert (c, noautofill)
      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)
    {