From: tomo <tomo>
Date: Fri, 13 May 2005 16:18:59 +0000 (+0000)
Subject: (<CJK RADICAL SEAL>): Copied from u02E00-CJK-Radical-Supplement.el.
X-Git-Tag: r21-4-15-chise-0_22^2~97
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=9f4fd6e41f60e4ff7c286bb5e16e8e4555cd9349;p=chise%2Fxemacs-chise.git

(<CJK RADICAL SEAL>): Copied from u02E00-CJK-Radical-Supplement.el.
(BC-8A60): Add `<-ideographic-component-forms' for U+5369; map to
U+5369.
---

diff --git a/lisp/utf-2000/Ideograph-R026-Seal.el b/lisp/utf-2000/Ideograph-R026-Seal.el
index fce5343..e975e4d 100644
--- a/lisp/utf-2000/Ideograph-R026-Seal.el
+++ b/lisp/utf-2000/Ideograph-R026-Seal.el
@@ -29,9 +29,29 @@
     (=daikanwa		. 02837)	; &I-M-02837;
     ))
 (define-char
-  '((ideographic-radical . 26)	; ⼙
+  '((name		. "CJK RADICAL SEAL")
+    (general-category	symbol other) ; Informative Category
+    (bidi-category	. "ON")
+    (mirrored		. nil)
+    (<-denotational
+     ((=ucs		  . #x353E)	; 㔾
+      ))
+    (<-ideographic-component-forms
+     ((=ucs		  . #x5369)	; 卩
+      ))
+    (<-radical
+     ((=ucs		  . #x353E)	; 㔾
+      ))
+    (=ucs		. #x2E8B)	; ⺋
+    ))
+(define-char
+  '((=>ucs		. #x5369)	; 卩
+    (ideographic-radical . 26)	; ⼙
     (ideographic-strokes . 0)
     (total-strokes	 . 2)
+    (<-ideographic-component-forms
+     ((=ucs		  . #x5369)	; 卩
+      ))
     (=big5-cdp		. #x8A60)	; &CDP-8A60;
     ))
 (define-char