From: tomo <tomo>
Date: Tue, 3 Feb 2004 11:42:49 +0000 (+0000)
Subject: (U+53E7): Use `->ideographic-variants*sources' instead of char-ref in
X-Git-Tag: r21-4-14-chise-0_21-23^2~95
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=020eadc9b1805fc1a1873f06539e0f7ffb73b0cb;p=chise%2Fxemacs-chise.git

(U+53E7): Use `->ideographic-variants*sources' instead of char-ref in
`->ideographic-variants'; unify GT-04102 and GT-K01162.
(U-00020BA0): Unify GT-04135 and GT-K01063.
---

diff --git a/lisp/utf-2000/Ideograph-R030-Mouth.el b/lisp/utf-2000/Ideograph-R030-Mouth.el
index 9bd2dec..d007aeb 100644
--- a/lisp/utf-2000/Ideograph-R030-Mouth.el
+++ b/lisp/utf-2000/Ideograph-R030-Mouth.el
@@ -138,11 +138,11 @@
     (ideographic-strokes . 2)
     (total-strokes	 . 5)
     (->ideographic-variants
-     (:sources	(shinjigen-1)
-      :char	((shinjigen-1	     . 515)
-		 (=daikanwa	     . 01525)	; ø¸€—µ
-		 )
+     ((shinjigen-1	  . 515)
+      (=daikanwa	  . 01525)	; ø¸€—µ
       ))
+    (->ideographic-variants*sources
+     shinjigen-1)
     (hanyu-dazidian	1 574 2)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
@@ -156,6 +156,9 @@
     (=ucs		. #x53E7)	; 叧
     (=jis-x0212		. #x3462)	; ø»‹‹
     (=cns11643-4	. #x216C)	; ø»—¡³
+    (=gt		. 04102)	; ý¡€€†
+    (=gt-k		. 01162)	; ý¡„€’Š
+    (=gt-pj-2		. #x4D4D)	; ý¡€€†
     (=daikanwa		. 03236)	; ø¸€²¤
     (=hanziku-2		. #xC5E9)	; ý¢€¬—©
     (=jef-china3	. #x91AE)	; øº‰†®
@@ -693,6 +696,9 @@
     (=ucs		. #x20BA0)	; ð ® 
     (=cns11643-5	. #x2161)	; ø»™«¬
     (=big5-cdp		. #x8BF7)	; ý¢€ˆ¯·
+    (=gt		. 04135)	; ý¡€€§
+    (=gt-k		. 01063)	; ý¡„€§
+    (=gt-pj-2		. #x4D56)	; ý¡€€§
     (=daikanwa		. 03258)	; ø¸€²º
     (=jef-china3	. #x91AF)	; øº‰†¯
     ))