From: tomo <tomo>
Date: Mon, 15 Nov 1999 15:24:29 +0000 (+0000)
Subject: (Fput_char_attribute): Forgot to `CHECK_CHAR'.
X-Git-Tag: r21-2-19-utf-2000-0_13-0~181
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=6797bde39c52203650064ef8e079af5a9c5f124a;p=chise%2Fxemacs-chise.git

(Fput_char_attribute): Forgot to `CHECK_CHAR'.
---

diff --git a/src/mule-charset.c b/src/mule-charset.c
index b83166d..0d6237b 100644
--- a/src/mule-charset.c
+++ b/src/mule-charset.c
@@ -529,6 +529,7 @@ Store CHARACTER's ATTRIBUTE with VALUE.
 {
   Lisp_Object ccs;
 
+  CHECK_CHAR (character);
   ccs = Ffind_charset (attribute);
   if (!NILP (ccs))
     {