(remove_char_ccs): Use `CHAR_TABLEP' instead of `CHAR_ID_TABLE_P'.

diff --git a/src/mule-charset.c b/src/mule-charset.c
index 49b0c85..ddfa753 100644 (file)
--- a/src/mule-charset.c
+++ b/src/mule-charset.c
@@ -375,7 +375,7 @@ 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_TABLE(encoding_table), character, Qnil);
     }