From ab949ba18785573ceb9bac2b8375bf65d5b9c1de Mon Sep 17 00:00:00 2001 From: tomo Date: Sun, 9 Feb 2003 10:28:54 +0000 Subject: [PATCH] (Fput_char_attribute): Canonicalise charset-aliases. --- src/chartab.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/chartab.c b/src/chartab.c index ba6db90..0e33354 100644 --- a/src/chartab.c +++ b/src/chartab.c @@ -3236,7 +3236,10 @@ Store CHARACTER's ATTRIBUTE with VALUE. CHECK_CHAR (character); if (!NILP (ccs)) - value = put_char_ccs_code_point (character, ccs, value); + { + value = put_char_ccs_code_point (character, ccs, value); + attribute = XCHARSET_NAME (ccs); + } else if (EQ (attribute, Q_decomposition)) put_char_composition (character, value); else if (EQ (attribute, Qto_ucs) || EQ (attribute, Q_ucs)) -- 1.7.10.4