From: tomo <tomo>
Date: Thu, 4 Jul 2002 17:11:23 +0000 (+0000)
Subject: (U-00020029): Unify M-00239; use `ideographic-' attribute instead of
X-Git-Tag: r21-2-44-0_18-m12~21
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=4ad658a2d2da8e5adc5ad84ddb99422353195b77;p=chise%2Fxemacs-chise.git

(U-00020029): Unify M-00239; use `ideographic-' attribute instead of
`ideographic-radical' and `ideographic-strokes'; delete `->identical'
for M-00239.
---

diff --git a/lisp/utf-2000/Ideograph-R001-One.el b/lisp/utf-2000/Ideograph-R001-One.el
index 2ecb113..3094afb 100644
--- a/lisp/utf-2000/Ideograph-R001-One.el
+++ b/lisp/utf-2000/Ideograph-R001-One.el
@@ -1677,6 +1677,19 @@
     (ucs		. #x20A44)	; 𠩄
     ))
 (define-char
+  '((ideographic-	(:radical	1 ; ⼀
+			 :strokes	6)
+			(:radical	6 ; ⼅
+			 :strokes	6))
+    (total-strokes	 . 7)
+    (hanyu-dazidian	1 553 5)
+    (chinese-cns11643-6		. #x2563)	; ø»›»ª
+    (ideograph-daikanwa		. 00239)	; ø¸€ƒ¯
+    (ideograph-hanziku-2	. #xC1C0)	; ý¢€¬‡€
+    (mojikyo			. 000239)	; ý €€ƒ¯
+    (ucs			. #x20029)	; 𠀩
+    ))
+(define-char
   '((ideographic-radical . 1)	; ⼀
     (ideographic-strokes . 6)
     (total-strokes	 . 7)
@@ -1713,18 +1726,6 @@
   '((ideographic-radical . 1)	; ⼀
     (ideographic-strokes . 6)
     (total-strokes	 . 7)
-    (->identical
-     ((chinese-cns11643-6 . #x2563)	; ø»›»ª
-      (ideograph-daikanwa . 00239)	; ø¸€ƒ¯
-      ))
-    (hanyu-dazidian	1 553 5)
-    (ideograph-hanziku-2	. #xC1C0)	; ý¢€¬‡€
-    (ucs			. #x20029)	; 𠀩
-    ))
-(define-char
-  '((ideographic-radical . 1)	; ⼀
-    (ideographic-strokes . 6)
-    (total-strokes	 . 7)
     (ideograph-gt-pj-9	. #x3B49)	; ý¡€€ƒ
     (ideograph-gt	. 00067)	; ý¡€€ƒ
     ))