From: tomo <tomo>
Date: Mon, 3 Sep 2001 06:56:58 +0000 (+0000)
Subject: (charset_code_point): Use `XCHAR_TABLE' instead of `XCHAR_ID_TABLE'.
X-Git-Tag: r21-2-41-chartab-2~18
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7f48267dd2d98f71c97e7461a565673261eaf340;p=chise%2Fxemacs-chise.git-

(charset_code_point): Use `XCHAR_TABLE' instead of `XCHAR_ID_TABLE'.
(encode_char_1): Likewise.
---

diff --git a/src/char-ucs.h b/src/char-ucs.h
index 06aa14c..084a211 100644
--- a/src/char-ucs.h
+++ b/src/char-ucs.h
@@ -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