From: tomo <tomo>
Date: Thu, 25 Dec 2003 19:48:46 +0000 (+0000)
Subject: (U-0002FA18): Use `<-vulgar-ideograph*sources' instead of char-ref in
X-Git-Tag: r21-4-14-chise-0_21-16^2~6
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=d1392904a7e74a457b0a8124c795227b6e7d1952;p=chise%2Fxemacs-chise.git

(U-0002FA18): Use `<-vulgar-ideograph*sources' instead of char-ref in
`<-vulgar-ideograph'.
(U+9EFE): Use `ideographic-{radical|strokes}@{ucs|cns}' instead of
`ideographic-'.
---

diff --git a/lisp/utf-2000/Ideograph-R205-Frog.el b/lisp/utf-2000/Ideograph-R205-Frog.el
index 2e53f8b..4a8f0b1 100644
--- a/lisp/utf-2000/Ideograph-R205-Frog.el
+++ b/lisp/utf-2000/Ideograph-R205-Frog.el
@@ -34,21 +34,20 @@
     (ideographic-strokes . 0)
     (total-strokes	 . 8)
     (<-vulgar-ideograph
-     (:char	((=daikanwa	     . 48257)	; ø¸‹²
-		 )
-      :sources	(seiji-tsuu morohashi-daikanwa)))
+     ((=daikanwa	  . 48257)	; ø¸‹²
+      ))
+    (<-vulgar-ideograph*sources
+     zhengzi-tong daikanwa)
     (=ucs		. #x2FA18)	; 黾
     (=cns11643-4	. #x2834)	; ø»—«
     (=daikanwa		. 48258)	; ø¸‹²‚
     ))
 (define-char
   '((morohashi-daikanwa	48258 0 2)
-    (ideographic-	(:radical	205 ; ⿌
-			 :strokes	0
-			 :sources	(ucs))
-			(:radical	30 ; ⼝
-			 :strokes	5
-			 :sources	(cns-11643)))
+    (ideographic-radical@ucs . 205)	; ⿌
+    (ideographic-strokes@ucs . 0)
+    (ideographic-radical@cns . 30)	; ⼝
+    (ideographic-strokes@cns . 5)
     (total-strokes	 . 8)
     (=ucs		. #x9EFE)	; 黾
     (=gb2312		. #x763C)	; ø»†ƒ•