From: tomo <tomo>
Date: Tue, 19 Jun 2007 08:16:25 +0000 (+0000)
Subject: (<CJK RADICAL KNIFE ONE>): Add `<-identical@component/connect-below'
X-Git-Tag: r21-4-19-chise-0_23-4^20~63
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=eb8e1351c4f2286632d904f58c2ea85d39378d36;p=chise%2Fxemacs-chise.git-

(<CJK RADICAL KNIFE ONE>): Add `<-identical@component/connect-below'
for BC-8B5B.
(BC-8B5B): New character.
---

diff --git a/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el b/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
index f9176f1..be0a1fa 100644
--- a/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
+++ b/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
@@ -122,6 +122,9 @@
     (<-formed@component/connect-below
      ((=ucs		  . #x5200)	; 刀
       ))
+    (<-identical@component/connect-below
+     ((=big5-cdp	  . #x8B5B)	; &CDP-8B5B;
+      ))
     ))
 (define-char
   '((<-denotational
@@ -138,6 +141,16 @@
       ))
     ))
 (define-char
+  '((=>ucs		. #x2E88)	; ⺈
+    (ideographic-radical . 18)	; ⼑
+    (ideographic-strokes . 0)
+    (total-strokes	 . 2)
+    (=big5-cdp		. #x8B5B)	; &CDP-8B5B;
+    (<-formed@component/connect-below
+     ((=ucs		  . #x5200)	; 刀
+      ))
+    ))
+(define-char
   '((<-denotational
      ((=ucs		  . #x5202)	; 刂
       ))