# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 945216957 0
# Node ID b89eb8bbaff1fd63f48bc97379d50cc1f887a2a5
# Parent  9fa7ffa9b04dd31ec4bc992b82475e0fc26f4373
(push_key_description): Adjusted for the change of
CHAR_STRING.
(Ftext_char_description): Likewise.

diff -r 9fa7ffa9b04d -r b89eb8bbaff1 src/keymap.c
--- a/src/keymap.c	Wed Dec 15 00:15:16 1999 +0000
+++ b/src/keymap.c	Wed Dec 15 00:15:57 1999 +0000
@@ -1903,10 +1903,7 @@
 	}
       else
 	{
-	  unsigned char work[4], *str;
-	  int i = CHAR_STRING (c, work, str);
-	  bcopy (str, p, i);
-	  p += i;
+	  p += CHAR_STRING (c, p);
 	}
     }
 
@@ -1997,21 +1994,23 @@
   (character)
      Lisp_Object character;
 {
-  char tem[6];
+  /* Currently MAX_MULTIBYTE_LENGTH is 4 (< 6).  */
+  unsigned char str[6];
+  int c;
 
   CHECK_NUMBER (character, 0);
 
-  if (!SINGLE_BYTE_CHAR_P (XFASTINT (character)))
+  c = XINT (character);
+  if (!SINGLE_BYTE_CHAR_P (c))
     {
-      unsigned char *str;
-      int len = non_ascii_char_to_string (XFASTINT (character), tem, &str);
+      int len = CHAR_STRING (c, str);
 
       return make_multibyte_string (str, 1, len);
     }
 
-  *push_text_char_description (XINT (character) & 0377, tem) = 0;
-
-  return build_string (tem);
+  *push_text_char_description (c & 0377, str) = 0;
+
+  return build_string (str);
 }
 
 /* Return non-zero if SEQ contains only ASCII characters, perhaps with