From: tomo <tomo>
Date: Thu, 11 Aug 2005 09:59:40 +0000 (+0000)
Subject: (Fput_char_attribute): Use `Fchar_refs_simplify_char_specs' for
X-Git-Tag: r21-4-17-chise-0_22-4^20~281
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8cd4a1f6a8882d203b2bc0cbdb0ff2041209eb21;p=chise%2Fxemacs-chise.git-

(Fput_char_attribute): Use `Fchar_refs_simplify_char_specs' for
`=>decomposition' before calling `put_char_composition'.
---

diff --git a/src/chartab.c b/src/chartab.c
index 67c7d92..2a134e1 100644
--- a/src/chartab.c
+++ b/src/chartab.c
@@ -3530,6 +3530,7 @@ Store CHARACTER's ATTRIBUTE with VALUE.
   else if ( EQ (attribute, Qmap_decomposition) ||
 	    EQ (attribute, Q_decomposition) )
     {
+      value = Fcopy_sequence (Fchar_refs_simplify_char_specs (value));
       attribute = put_char_composition (character, value);
       if ( !EQ (attribute, Qmap_decomposition) &&
 	   SYMBOLP (XCAR (value)) )