From: tomo <tomo>
Date: Fri, 7 Nov 2003 09:00:32 +0000 (+0000)
Subject: (<CJK RADICAL SMALL ONE>): Add `<-ideographic-component-forms' for
X-Git-Tag: r21-4-14-chise-0_21-1^2~3
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=319e9846898f622409ed639aef4951c87be91101;p=chise%2Fxemacs-chise.git.1

(<CJK RADICAL SMALL ONE>): Add `<-ideographic-component-forms' for
U+5C0F.
(GT-K00305): Likewise.
(<CJK RADICAL SMALL TWO>): Likewise.
(<CJK RADICAL JADE>): Add `<-ideographic-component-forms' for
U+738B; unify GT-K00402.
(BC-8DC5): New character.
---

diff --git a/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el b/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
index cb0a684..e41c92a 100644
--- a/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
+++ b/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
@@ -148,6 +148,9 @@
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (<-ideographic-component-forms
+     ((=ucs		  . #x5C0F)	; 小
+      ))
     (=gt-pj-k1		. #x3233)	; ⺌
     (=big5-cdp		. #x8B54)	; ý¢€ˆ­”
     (=gt-k		. 00303)	; ý¡„€„¯
@@ -155,6 +158,9 @@
     ))
 (define-char
   '((=>ucs		. #x2E8C)	; ⺌
+    (<-ideographic-component-forms
+     ((=ucs		  . #x5C0F)	; 小
+      ))
     (=gt-pj-k1		. #x324E)	; ý¡„€„±
     (=gt-k		. 00305)	; ý¡„€„±
     ))
@@ -163,6 +169,9 @@
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (<-ideographic-component-forms
+     ((=ucs		  . #x5C0F)	; 小
+      ))
     (=gt-pj-k1		. #x3251)	; ⺍
     (=gt-k		. 00325)	; ý¡„€……
     (=ucs		. #x2E8D)	; ⺍
@@ -436,9 +445,14 @@
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (<-ideographic-component-forms
+     ((=ucs		  . #x738B)	; 王
+      ))
     (<-radical
      ((=ucs		  . #x248E9)	; 𤣩
       ))
+    (=gt-pj-k1		. #x3467)	; ⺩
+    (=gt-k		. 00402)	; ý¡„€†’
     (=ucs		. #x2EA9)	; ⺩
     ))
 (define-char
@@ -449,6 +463,10 @@
     (=ucs		. #x2EAA)	; ⺪
     ))
 (define-char
+  '((=>ucs		. #x2EAA)	; ⺪
+    (=big5-cdp		. #x8DC5)	; ý¢€ˆ·…
+    ))
+(define-char
   '((name		. "CJK RADICAL EYE")
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")