(Fload_char_attribute_table): Use
`chise_char_feature_value_iterate' instead of `chise_ft_iterate'.
+2003-10-11 MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
+
+ * text-coding.c (COMPOSE_ADD_CHAR): Fixed.
+
2003-08-19 MORIOKA Tomohiko <tomo@mousai.as.wakwak.ne.jp>
* chartab.c (put_char_table): Modify for inherited coded-charsets
if (CHARP (ret))
{
Emchar char2 = XCHARVAL (ret);
- ret = Fget_char_attribute (make_char (character), Qcomposition,
- Qnil);
- if (NILP (ret))
+ Lisp_Object ret2 = Fget_char_attribute (ret, Qcomposition, Qnil);
+
+ if (NILP (ret2))
{
- decode_add_er_char (str, character, dst);
+ decode_add_er_char (str, char2, dst);
str->combined_char_count = 0;
str->combining_table = Qnil;
}
{
str->combined_chars[0] = char2;
str->combined_char_count = 1;
- str->combining_table = ret;
+ str->combining_table = ret2;
}
}
else
{
+ ret = Fget_char_attribute (make_char (character), Qcomposition,
+ Qnil);
+
COMPOSE_FLUSH_CHARS (str, dst);
- decode_add_er_char (str, character, dst);
+ if (NILP (ret))
+ decode_add_er_char (str, character, dst);
+ else
+ {
+ str->combined_chars[0] = character;
+ str->combined_char_count = 1;
+ str->combining_table = ret;
+ }
}
}
}