From: tomo <tomo>
Date: Mon, 21 Oct 2002 05:31:34 +0000 (+0000)
Subject: (C1-5E32): Unify M-01597; use `ideographic-' instead of
X-Git-Tag: r21-2-44-utf-2000-m0_18-md1~7
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8ddf1267de497e6b8bab468e4a41878cdbb6bee4;p=chise%2Fxemacs-chise.git-

(C1-5E32): Unify M-01597; use `ideographic-' instead of
`->same-ideograph'; add `<-original-ideograph' for M-14301.
---

diff --git a/lisp/utf-2000/Ideograph-R013-Down-Box.el b/lisp/utf-2000/Ideograph-R013-Down-Box.el
index a246119..3693922 100644
--- a/lisp/utf-2000/Ideograph-R013-Down-Box.el
+++ b/lisp/utf-2000/Ideograph-R013-Down-Box.el
@@ -1043,15 +1043,21 @@
     ))
 (define-char
   '((=>ucs		. #x6700)	; 最
-    (ideographic-radical . 13)	; ⼌
-    (ideographic-strokes . 10)
+    (ideographic-	(:radical	13 ; ⼌
+			 :strokes	10
+			 :sources	(cns-11643))
+			(:radical	14 ; ⼍
+			 :strokes	10
+			 :sources	(morohashi-daikanwa)))
     (total-strokes	 . 12)
-    (->same-ideograph
-     ((ideograph-daikanwa . 01597)	; ø¸€˜½
-      ))
+    (<-original-ideograph
+     (:char	((ideograph-daikanwa . 14301)	; ø¸ƒŸ
+		 )
+      :sources	(seiji-tsuu morohashi-daikanwa)))
     (hanyu-dazidian	2 1516 8)
     (chinese-cns11643-1 . #x5E32)	; ø»’œ“
     (chinese-big5	. #xB3CC)	; ý¢€‹Œ
+    (ideograph-daikanwa . 01597)	; ø¸€˜½
     ))
 (define-char
   '((=>ucs		. #x34BE)	; 㒾