X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fmule-charset.c;h=ddfa753b8cf60bf15996488349ff613c3401ee66;hb=b963d0a5eaef237c99bb88a9581129266885fb00;hp=69102dbc241bfba1f09f82681e332fd99b477cf5;hpb=e5a6fbf8fd48090f4c04aafd4ba4caad0313f2bb;p=chise%2Fxemacs-chise.git

diff --git a/src/mule-charset.c b/src/mule-charset.c
index 69102db..ddfa753 100644
--- a/src/mule-charset.c
+++ b/src/mule-charset.c
@@ -353,7 +353,7 @@ put_char_ccs_code_point (Lisp_Object character,
       XCHARSET_ENCODING_TABLE (ccs)
 	= encoding_table = make_char_id_table (Qnil);
     }
-  put_char_id_table (XCHAR_ID_TABLE(encoding_table), character, value);
+  put_char_id_table (XCHAR_TABLE(encoding_table), character, value);
   return Qt;
 }
 
@@ -375,9 +375,9 @@ remove_char_ccs (Lisp_Object character, Lisp_Object ccs)
 				      XINT (cpos));
 	}
     }
-  if (CHAR_ID_TABLE_P (encoding_table))
+  if (CHAR_TABLEP (encoding_table))
     {
-      put_char_id_table (XCHAR_ID_TABLE(encoding_table), character, Qnil);
+      put_char_id_table (XCHAR_TABLE(encoding_table), character, Qnil);
     }
   return Qt;
 }