From: tomo <tomo>
Date: Tue, 13 Jan 2004 08:08:10 +0000 (+0000)
Subject: (U-00022450): Use `<-vulgar-ideograph*sources' instead of char-ref in
X-Git-Tag: r21-4-14-chise-0_21-18^2~3
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e6d406a3abd368d416e5307cc0c4da3c9b74e968;p=chise%2Fxemacs-chise.git

(U-00022450): Use `<-vulgar-ideograph*sources' instead of char-ref in
`<-vulgar-ideograph'.
(U+5F53): Use `<-simplified' and `<-simplified*sources' instead of
`simplified-ideograph-of'.
---

diff --git a/lisp/utf-2000/Ideograph-R058-Snout.el b/lisp/utf-2000/Ideograph-R058-Snout.el
index 15e82f0..403f72a 100644
--- a/lisp/utf-2000/Ideograph-R058-Snout.el
+++ b/lisp/utf-2000/Ideograph-R058-Snout.el
@@ -106,10 +106,10 @@
     (ideographic-strokes . 3)
     (total-strokes	 . 6)
     (<-vulgar-ideograph
-     (:sources	(morohashi-daikanwa)
-      :char	((=daikanwa	     . 21890)	; ø¸…–‚
-		 )
+     ((=daikanwa	  . 21890)	; ø¸…–‚
       ))
+    (<-vulgar-ideograph*sources
+     daikanwa)
     (=ucs		. #x22450)	; 𢑐
     (=cns11643-6	. #x246E)	; ø»›º—
     (=daikanwa		. 09912)	; ø¸‚š¸
@@ -118,12 +118,12 @@
   '((ideographic-radical . 58)	; â¼¹
     (ideographic-strokes . 3)
     (total-strokes	 . 6)
-    (shinjigen-2	. 5071)
-    (simplified-ideograph-of
-     ((sources		  morohashi-daikanwa)
-      (char . ((=daikanwa	   . 21890)	; ø¸…–‚
-	       ))
+    (<-simplified
+     ((=daikanwa	  . 21890)	; ø¸…–‚
       ))
+    (<-simplified*sources
+     daikanwa)
+    (shinjigen-2	. 5071)
     (=ucs		. #x5F53)	; 当
     (=jis-x0208		. #x4576)	; ø½Š¬‰
     (=gb2312		. #x3531)	; ø»„£¬