From: tomo <tomo>
Date: Fri, 10 Aug 2001 06:28:56 +0000 (+0000)
Subject: - Use `=>ucs' instead of `->ucs'.
X-Git-Tag: r21-2-38-utf-2000-0_17-1~44
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=b760fb116654ee1230a64bfd5e876ce81e5b2c63;p=chise%2Fxemacs-chise.git

- Use `=>ucs' instead of `->ucs'.
(C6-2651): New character; relate to M-04726.
(C6-2A3E): Add `->same-ideograph' for M-04718.
---

diff --git a/lisp/utf-2000/Ideograph-R031-Enclosure.el b/lisp/utf-2000/Ideograph-R031-Enclosure.el
index 8532164..5503067 100644
--- a/lisp/utf-2000/Ideograph-R031-Enclosure.el
+++ b/lisp/utf-2000/Ideograph-R031-Enclosure.el
@@ -36,7 +36,7 @@
     (ucs		. #x56D9)	; 囙
     ))
 (define-char
-  '((->ucs		. #x361D)	; 㘝
+  '((=>ucs		. #x361D)	; 㘝
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 2)
     (total-strokes	 . 5)
@@ -145,7 +145,7 @@
     (ucs			. #x56DF)	; 囟
     ))
 (define-char
-  '((->ucs		. #x56DF)	; 囟
+  '((=>ucs		. #x56DF)	; 囟
     (morohashi-daikanwa	4691 0 0)
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 3)
@@ -181,7 +181,7 @@
     (ideograph-daikanwa . 04694)	; ø¸‰–
     ))
 (define-char
-  '((->ucs		. #x361F)	; 㘟
+  '((=>ucs		. #x361F)	; 㘟
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 3)
     (total-strokes	 . 6)
@@ -325,7 +325,7 @@
     (ucs		. #x56F1)	; 囱
     ))
 (define-char
-  '((->ucs		. #x56F1)	; 囱
+  '((=>ucs		. #x56F1)	; 囱
     (morohashi-daikanwa	4710 0 2)
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 4)
@@ -471,6 +471,13 @@
     (ideograph-daikanwa . 04726)	; ø¸‰¶
     ))
 (define-char
+  '((morohashi-daikanwa	4726 0 0)
+    (ideographic-radical . 31)	; ⼞
+    (ideographic-strokes . 4)
+    (total-strokes	 . 7)
+    (chinese-cns11643-6 . #x2651)	; ø»›¼¶
+    ))
+(define-char
   '((ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 4)
     (total-strokes	 . 7)
@@ -539,6 +546,7 @@
     (ideographic-strokes . 4)
     (total-strokes	 . 7)
     (chinese-cns11643-1 . #x4959)	; ø»‘¾„
+    (mojikyo		. 059288)	; ý €Žž˜
     (ucs		. #x56EA)	; 囪
     ))
 (define-char
@@ -563,7 +571,7 @@
     (ucs		. #x56F5)	; 囵
     ))
 (define-char
-  '((->ucs		. #x56F6)	; 囶
+  '((=>ucs		. #x56F6)	; 囶
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
@@ -644,7 +652,7 @@
     (ucs		. #x56F8)	; 囸
     ))
 (define-char
-  '((->ucs		. #x56F9)	; 囹
+  '((=>ucs		. #x56F9)	; 囹
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
@@ -655,7 +663,7 @@
     (ideograph-daikanwa		. 04744)	; ø¸Šˆ
     ))
 (define-char
-  '((->ucs		. #x56F9)	; 囹
+  '((=>ucs		. #x56F9)	; 囹
     (morohashi-daikanwa	4744 0 1)
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 5)
@@ -755,6 +763,9 @@
   '((ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
+    (->same-ideograph
+     ((ideograph-daikanwa . 04718)	; ø¸‰®
+      ))
     (chinese-cns11643-6 . #x2A3E)	; ø»œ‚›
     ))
 (define-char
@@ -892,7 +903,7 @@
     (ucs		. #x3623)	; 㘣
     ))
 (define-char
-  '((->ucs		. #x3623)	; 㘣
+  '((=>ucs		. #x3623)	; 㘣
     (morohashi-daikanwa	4770 0 1)
     (ideographic-radical . 31)	; ⼞
     (total-strokes	 . 10)
@@ -905,7 +916,7 @@
     (ideograph-daikanwa . 04771)	; ø¸Š£
     ))
 (define-char
-  '((->ucs		. #x5701)	; 圁
+  '((=>ucs		. #x5701)	; 圁
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 7)
     (total-strokes	 . 10)
@@ -1068,7 +1079,7 @@
     (ucs		. #x5707)	; 圇
     ))
 (define-char
-  '((->ucs		. #x5708)	; 圈
+  '((=>ucs		. #x5708)	; 圈
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 8)
     (total-strokes	 . 11)
@@ -1080,7 +1091,7 @@
     (mojikyo			. 004789)	; ý €Šµ
     ))
 (define-char
-  '((->ucs		. #x5708)	; 圈
+  '((=>ucs		. #x5708)	; 圈
     (morohashi-daikanwa	4789 0 2)
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 8)
@@ -1161,7 +1172,7 @@
     (ideograph-daikanwa . 04796)	; ø¸Š¼
     ))
 (define-char
-  '((->ucs		. #x570A)	; 圊
+  '((=>ucs		. #x570A)	; 圊
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 8)
     (total-strokes	 . 11)
@@ -1179,7 +1190,7 @@
     (ucs		. #x570A)	; 圊
     ))
 (define-char
-  '((->ucs		. #x570A)	; 圊
+  '((=>ucs		. #x570A)	; 圊
     (morohashi-daikanwa	4797 0 3)
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 8)
@@ -1248,7 +1259,7 @@
     (ideograph-daikanwa . 04805)	; ø¸‹…
     ))
 (define-char
-  '((->ucs		. #x570D)	; 圍
+  '((=>ucs		. #x570D)	; 圍
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 9)
     (total-strokes	 . 12)
@@ -1348,6 +1359,7 @@
     (total-strokes	 . 12)
     (chinese-isoir165	. #x7A68)	; ø»Ž²‰
     (chinese-cns11643-4 . #x3668)	; ø»˜€¥
+    (mojikyo		. 053324)	; ý €Œ
     (ucs		. #x5710)	; 圐
     ))
 (define-char
@@ -1492,7 +1504,7 @@
     (chinese-cns11643-6 . #x5B54)	; ø»Š¯
     ))
 (define-char
-  '((->ucs		. #x5716)	; 圖
+  '((=>ucs		. #x5716)	; 圖
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 11)
     (total-strokes	 . 14)
@@ -1513,7 +1525,7 @@
     (ucs		. #x5716)	; 圖
     ))
 (define-char
-  '((->ucs		. #x5716)	; 圖
+  '((=>ucs		. #x5716)	; 圖
     (morohashi-daikanwa	4832 0 4)
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 11)
@@ -1694,7 +1706,7 @@
     (ucs			. #x571C)	; 圜
     ))
 (define-char
-  '((->ucs		. #x571C)	; 圜
+  '((=>ucs		. #x571C)	; 圜
     (morohashi-daikanwa	4851 0 0)
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 13)
@@ -1811,19 +1823,19 @@
     (ucs		. #x571D)	; 圝
     ))
 (define-char
-  '((->ucs		. #x571E)	; 圞
-    (morohashi-daikanwa	4866 1)
+  '((morohashi-daikanwa	4866 1)
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 23)
     (total-strokes	 . 26)
     (mojikyo		. 050134)	; ý €Œ–
+    (ucs		. #x571E)	; 圞
     ))
 (define-char
-  '((morohashi-daikanwa	4866 1 1)
+  '((=>ucs		. #x571E)	; 圞
+    (morohashi-daikanwa	4866 1 1)
     (ideographic-radical . 31)	; ⼞
     (ideographic-strokes . 23)
     (total-strokes	 . 26)
-    (->mojikyo		. 050134)	; ý €Œ–
+    (->mojikyo		. 050134)	; 圞
     (chinese-cns11643-2 . #x715A)	; ø»•‚¹
-    (ucs		. #x571E)	; 圞
     ))