(charset_code_point): Use `XCHAR_TABLE' instead of `XCHAR_ID_TABLE'.
authortomo <tomo>
Mon, 3 Sep 2001 06:56:58 +0000 (06:56 +0000)
committertomo <tomo>
Mon, 3 Sep 2001 06:56:58 +0000 (06:56 +0000)
(encode_char_1): Likewise.

src/char-ucs.h

index 06aa14c..084a211 100644 (file)
@@ -587,7 +587,7 @@ charset_code_point (Lisp_Object charset, Emchar ch)
   Lisp_Object ret;
 
   if ( CHAR_ID_TABLE_P (encoding_table)
-       && INTP (ret = get_char_id_table (XCHAR_ID_TABLE(encoding_table),
+       && INTP (ret = get_char_id_table (XCHAR_TABLE(encoding_table),
                                         ch)) )
     return XINT (ret);
   else
@@ -613,7 +613,7 @@ encode_char_1 (Emchar ch, Lisp_Object* charset)
 
          if ( CHAR_ID_TABLE_P (encoding_table)
               && INTP (ret
-                       = get_char_id_table (XCHAR_ID_TABLE(encoding_table),
+                       = get_char_id_table (XCHAR_TABLE(encoding_table),
                                             ch)) )
            return XINT (ret);
          else