From e5a6fbf8fd48090f4c04aafd4ba4caad0313f2bb Mon Sep 17 00:00:00 2001 From: tomo Date: Fri, 31 Aug 2001 05:50:53 +0000 Subject: [PATCH] (put_char_ccs_code_point): Modify for interface change of `put_char_id_table'. (remove_char_ccs): Likewise. --- src/mule-charset.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/mule-charset.c b/src/mule-charset.c index ae25638..69102db 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 (character), value, encoding_table); + put_char_id_table (XCHAR_ID_TABLE(encoding_table), character, value); return Qt; } @@ -377,7 +377,7 @@ remove_char_ccs (Lisp_Object character, Lisp_Object ccs) } if (CHAR_ID_TABLE_P (encoding_table)) { - put_char_id_table (XCHAR (character), Qnil, encoding_table); + put_char_id_table (XCHAR_ID_TABLE(encoding_table), character, Qnil); } return Qt; } -- 1.7.10.4