From 9f4fd6e41f60e4ff7c286bb5e16e8e4555cd9349 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Fri, 13 May 2005 16:18:59 +0000
Subject: [PATCH] (<CJK RADICAL SEAL>): Copied from
 u02E00-CJK-Radical-Supplement.el. (BC-8A60): Add
 `<-ideographic-component-forms' for U+5369; map to U+5369.

---
 lisp/utf-2000/Ideograph-R026-Seal.el |   22 +++++++++++++++++++++-
 1 file changed, 21 insertions(+), 1 deletion(-)

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
-- 
1.7.10.4