From: tomo <tomo>
Date: Wed, 10 Oct 2001 09:29:01 +0000 (+0000)
Subject: (M-00096): Use `<-original-ideograph' instead of
X-Git-Tag: r21-2-41-utf-2000-0_18-1~306
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=e426ce7d45e5c1cf857b1dab2d51f47ffe250bbf;p=chise%2Fxemacs-chise.git-

(M-00096): Use `<-original-ideograph' instead of
`original-char-of-shinjigen-1'; unify U-0002007D.
(C*-****): Unify CJK Ext-B code points.
---

diff --git a/lisp/utf-2000/Ideograph-R003-Dot.el b/lisp/utf-2000/Ideograph-R003-Dot.el
index 9a3f645..8671617 100644
--- a/lisp/utf-2000/Ideograph-R003-Dot.el
+++ b/lisp/utf-2000/Ideograph-R003-Dot.el
@@ -80,17 +80,22 @@
     (mojikyo		. 000095)	; ý €€Ÿ
     ))
 (define-char
-  '((=>ucs		. #x4E38)	; 丸
-    (ideographic-radical . 3)	; ⼂
+  '((ideographic-radical . 3)	; ⼂
     (ideographic-strokes . 2)
     (total-strokes	 . 3)
-    (original-char-of-shinjigen-1 . 39)
+    (<-original-ideograph
+     (:sources	(chuuka-daijiten morohashi-daikanwa shinjigen-1)
+      :char	((shinjigen-1	     . 39)
+		 (ideograph-daikanwa . 00094)	; ø¸€ž
+		 )
+      ))
     (shinjigen-1	. 40)
     (chinese-cns11643-6 . #x2132)	; ø»›µ
     (ideograph-gt-pj-2	. #x306B)	; ý¡€€‚…
     (ideograph-daikanwa . 00096)	; ø¸€ 
     (ideograph-gt	. 00133)	; ý¡€€‚…
     (mojikyo		. 000096)	; ý €€ 
+    (ucs		. #x2007D)	; 𠁽
     ))
 (define-char
   '((script		Ideograph)
@@ -238,6 +243,7 @@
     (ideograph-daikanwa . 00102)	; ø¸€¦
     (ideograph-gt	. 00140)	; ý¡€€‚Œ
     (mojikyo		. 000102)	; ý €€¦
+    (ucs		. #x2007F)	; 𠁿
     ))
 (define-char
   '((ideographic-radical . 3)	; ⼂
@@ -255,6 +261,7 @@
     (ideograph-daikanwa . 00103)	; ø¸€§
     (ideograph-gt	. 00143)	; ý¡€€‚
     (mojikyo		. 000103)	; ý €€§
+    (ucs		. #x20082)	; 𠂂
     ))
 (define-char
   '((ideographic-radical . 3)	; ⼂
@@ -318,4 +325,5 @@
     (ideograph-daikanwa . 00105)	; ø¸€©
     (ideograph-gt	. 00147)	; ý¡€€‚“
     (mojikyo		. 000105)	; ý €€©
+    (ucs		. #x20084)	; 𠂄
     ))