From: tomo <tomo>
Date: Tue, 25 Feb 2003 04:12:22 +0000 (+0000)
Subject: (C7-262D): Unify U-00020398 instead of using `->identical'; use
X-Git-Tag: r21-4-10-utf-2000-0_20-11~10
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=88bcb8df7d507537d798d80f3782d3dc05257a41;p=chise%2Fxemacs-chise.git

(C7-262D): Unify U-00020398 instead of using `->identical'; use
`ideographic-' instead of `ideographic-radical' and
`ideographic-strokes'.
---

diff --git a/lisp/utf-2000/Ideograph-R114-Track.el b/lisp/utf-2000/Ideograph-R114-Track.el
index dcba67d..f55ae94 100644
--- a/lisp/utf-2000/Ideograph-R114-Track.el
+++ b/lisp/utf-2000/Ideograph-R114-Track.el
@@ -269,34 +269,26 @@
     (ideograph-daikanwa . 24898)	; ø¸†…‚
     ))
 (define-char
-  '((=>ucs		. #x20398)	; 𠎘
-    (morohashi-daikanwa	24898 0 2)
-    (ideographic-radical . 114)	; â½±
-    (ideographic-strokes . 10)
+  '((morohashi-daikanwa	24898 0 2)
+    (ideographic-	(:radical	114 ; â½±
+			 :strokes	10
+			 :sources	(morohashi-daikanwa cns-11643))
+			(:radical	9 ; ⼈
+			 :strokes	13
+			 :sources	(ucs)))
     (total-strokes	 . 15)
-    (->identical
-     ((ucs		  . #x20398)	; 𠎘
-      ))
+    (hanyu-dazidian	1 215 14)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (ucs		  . #x2FF1)	; ⿱
       )
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-	(ucs		    . #x2FF1)	; ⿱
-	)
-       ((ideograph-gt-pj-9  . #x4D4C)	; ý¢€ˆ­
-	(=big5-cdp	    . #x8B5D)	; ý¢€ˆ­
-	(=gt-k		    . 00057)	; ý¡„€€¹
-	(=jef-china3	    . #x71FA)	; øº‡‡º
-	)
-       ((ucs		    . #x4E00)	; 一
-	))
-      (=big5-cdp	  . #x8AFC)	; ý¢€ˆ«¼
+     ((=big5-cdp	  . #x8AFC)	; ý¢€ˆ«¼
       )
      ((=big5-cdp	  . #x87FB)	; ý¢€ˆŸ»
       ))
-    (chinese-cns11643-7 . #x262D)	; ø»ž†–
+    (chinese-cns11643-7		. #x262D)	; ø»ž†–
+    (ideograph-hanziku-1	. #xD2B1)	; ý¢€Š±
+    (ucs			. #x20398)	; 𠎘
     ))
 (define-char
   '((=>ucs		. #x20FA7)	; 𠾧