From: tomo <tomo>
Date: Wed, 31 Dec 2003 14:08:06 +0000 (+0000)
Subject: (M-07097): New character.
X-Git-Tag: r21-4-14-chise-0_21-17^2~88
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=1fe87cffa845c1865716b8282d51675ec95e25b2;p=chise%2Fxemacs-chise.git-

(M-07097): New character.
(U+374E): Map to M-07097.
(M-07354): Map to U-00021AD2.
(U-00021AD2): Map to M-07354.
(M-28841): New character.
(U-00021B18): Map to M-28841.
---

diff --git a/lisp/utf-2000/Ideograph-R040-Roof.el b/lisp/utf-2000/Ideograph-R040-Roof.el
index cca3214..c085a47 100644
--- a/lisp/utf-2000/Ideograph-R040-Roof.el
+++ b/lisp/utf-2000/Ideograph-R040-Roof.el
@@ -790,7 +790,15 @@
     (=cns11643-2	. #x235D)	; ø»“˜
     ))
 (define-char
-  '((ideographic-radical . 40)	; ⼧
+  '((=>ucs		. #x374E)	; 㝎
+    (ideographic-radical . 40)	; ⼧
+    (ideographic-strokes . 4)
+    (total-strokes	 . 7)
+    (=daikanwa		. 07097)	; ø¸®¹
+    ))
+(define-char
+  '((morohashi-daikanwa	7097 0 0)
+    (ideographic-radical . 40)	; ⼧
     (ideographic-strokes . 4)
     (total-strokes	 . 7)
     (=ucs		. #x374E)	; 㝎
@@ -5217,12 +5225,21 @@
     (=cns11643-7	. #x3757)	; ø»žŸ¾
     ))
 (define-char
-  '((ideographic-radical . 40)	; ⼧
+  '((=>ucs		. #x21AD2)	; 𡫒
+    (ideographic-radical . 40)	; ⼧
     (ideographic-strokes . 14)
     (total-strokes	 . 17)
     (=daikanwa		. 07354)	; ø¸²º
     ))
 (define-char
+  '((morohashi-daikanwa	7354 0 0)
+    (ideographic-radical . 40)	; ⼧
+    (ideographic-strokes . 14)
+    (total-strokes	 . 17)
+    (=ucs		. #x21AD2)	; 𡫒
+    (=cns11643-7	. #x3759)	; ø»ž €
+    ))
+(define-char
   '((=>ucs		. #x21ADD)	; 𡫝
     (ideographic-radical . 40)	; ⼧
     (ideographic-strokes . 14)
@@ -5292,13 +5309,6 @@
     (=cns11643-5	. #x5B38)	; ø»›€
     ))
 (define-char
-  '((ideographic-radical . 40)	; ⼧
-    (ideographic-strokes . 14)
-    (total-strokes	 . 17)
-    (=ucs		. #x21AD2)	; 𡫒
-    (=cns11643-7	. #x3759)	; ø»ž €
-    ))
-(define-char
   '((=>ucs		. #x21ADE)	; 𡫞
     (ideographic-radical . 40)	; ⼧
     (ideographic-strokes . 15)
@@ -5922,7 +5932,17 @@
     (=cbeta		. 03865)	; ø¸ ¼™
     ))
 (define-char
-  '((ideographic-radical . 40)	; ⼧
+  '((=>ucs		. #x21B18)	; 𡬘
+    (ideographic-radical@ucs . 40)	; ⼧
+    (ideographic-strokes@ucs . 23)
+    (ideographic-radical@daikanwa . 124)	; â½»
+    (ideographic-strokes@daikanwa . 20)
+    (total-strokes	 . 26)
+    (=daikanwa		. 28841)	; ø¸‡‚©
+    ))
+(define-char
+  '((morohashi-daikanwa	28841 0 2)
+    (ideographic-radical . 40)	; ⼧
     (ideographic-strokes . 23)
     (total-strokes	 . 26)
     (=ucs		. #x21B18)	; 𡬘