From: tomo <tomo>
Date: Tue, 18 Dec 2001 11:26:15 +0000 (+0000)
Subject: (iddef-read-buffer): Don't add `ideographic-structure' into a
X-Git-Tag: chise-base-0_23~108
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=b2677833115a0b505200d07771733363b5cb795a;p=chise%2Ftomoyo-tools.git

(iddef-read-buffer): Don't add `ideographic-structure' into a
character specified in `->same-ideograph' or `->identical' if the
character has `ucs'.
---

diff --git a/iddef.el b/iddef.el
index b49b19f..4219b4a 100644
--- a/iddef.el
+++ b/iddef.el
@@ -81,7 +81,8 @@
 			     (find-char (plist-get ref :char)))
 			    (t
 			     (find-char ref))))
-		(put-char-attribute ret 'ideographic-structure struct)))
+		(unless (get-char-attribute ret 'ucs)
+		  (put-char-attribute ret 'ideographic-structure struct))))
 	  )))))
 
 ;;;###autoload