From: tomo <tomo>
Date: Fri, 10 Aug 2001 12:41:29 +0000 (+0000)
Subject: (J90-6136): Unify MH-347; use `->same-ideograph' for M-21735; delete
X-Git-Tag: r21-2-38-utf-2000-0_17-1~22
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=4c47fc35b4ee4c623ed3078620420eed783c5158;p=chise%2Fxemacs-chise.git

(J90-6136): Unify MH-347; use `->same-ideograph' for M-21735; delete
`ideographic-variants' for M021735.
---

diff --git a/lisp/utf-2000/Ideograph-R102-Field.el b/lisp/utf-2000/Ideograph-R102-Field.el
index 0b32622..518ab4c 100644
--- a/lisp/utf-2000/Ideograph-R102-Field.el
+++ b/lisp/utf-2000/Ideograph-R102-Field.el
@@ -156,6 +156,20 @@
     (ideograph-daikanwa . 21737)	; ø¸…“©
     ))
 (define-char
+  '((morohashi-daikanwa	ho 347)
+    (ideographic-radical . 102)	; â½¥
+    (ideographic-strokes . 2)
+    (total-strokes	 . 7)
+    (->same-ideograph
+     (:sources	(morohashi-daikanwa)
+      :char	((ideograph-daikanwa . 21735)	; ø¸…“§
+		 )
+      ))
+    (japanese-jisx0208-1990	. #x6136)	; ø½‹”‘
+    (mojikyo			. 054615)	; ý €•—
+    (ucs			. #x753C)	; 甼
+    ))
+(define-char
   '((ideographic-radical . 102)	; â½¥
     (ideographic-strokes . 2)
     (total-strokes	 . 7)
@@ -178,18 +192,6 @@
     ))
 (define-char
   '((ideographic-radical . 102)	; â½¥
-    (ideographic-strokes . 2)
-    (total-strokes	 . 7)
-    (ideographic-variants
-     ((char . ((mojikyo		   . 021735)	; ý €…“§
-	       ))
-      ))
-    (japanese-jisx0208-1990	. #x6136)	; ø½‹”‘
-    (mojikyo			. 054615)	; ý €•—
-    (ucs			. #x753C)	; 甼
-    ))
-(define-char
-  '((ideographic-radical . 102)	; â½¥
     (ideographic-strokes . 3)
     (total-strokes	 . 8)
     (chinese-gb2312	. #x3B2D)	; ø»„¬œ