From: Kenichi Handa <handa@m17n.org>
Date: Wed, 11 Apr 2007 12:03:45 +0000 (+0000)
Subject: (Fchar_to_string): Use CHARACTERP, not INTEGERP.
X-Git-Tag: emacs-pretest-23.0.90~8295^2~553
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1b9c91ed99742ac24ea7bb527388364997d8e31b;p=emacs.git

(Fchar_to_string): Use CHARACTERP, not INTEGERP.
---

diff --git a/src/editfns.c b/src/editfns.c
index fa5f9c11684..2e7e4ca235b 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -205,7 +205,7 @@ usage: (char-to-string CHAR)  */)
   int len;
   unsigned char str[MAX_MULTIBYTE_LENGTH];
 
-  CHECK_NUMBER (character);
+  CHECK_CHARACTER (character);
 
   len = CHAR_STRING (XFASTINT (character), str);
   return make_string_from_bytes (str, 1, len);
@@ -2155,7 +2155,7 @@ general_insert_function (insert_func, insert_from_string_func,
   for (argnum = 0; argnum < nargs; argnum++)
     {
       val = args[argnum];
-      if (INTEGERP (val))
+      if (CHARACTERP (val))
 	{
 	  unsigned char str[MAX_MULTIBYTE_LENGTH];
 	  int len;