From: tomo <tomo>
Date: Thu, 25 Dec 2003 19:28:40 +0000 (+0000)
Subject: (U+4E0E): Use `ideographic-strokes@{ucs|gt}', `total-strokes@{ucs|gt}'
X-Git-Tag: r21-4-14-chise-0_21-16^2~10
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=24ed6a0bcdc62f4c6e7efb77a5547a7a1342faef;p=chise%2Fxemacs-chise.git-

(U+4E0E): Use `ideographic-strokes@{ucs|gt}', `total-strokes@{ucs|gt}'
and `{ideographic|total}-strokes@ucs*sources' instead of
`ideographic-'; use `->synonyms*sources' instead of char-ref in
`->synonyms'.
---

diff --git a/lisp/utf-2000/Ideograph-R001-One.el b/lisp/utf-2000/Ideograph-R001-One.el
index 1f4265c..1a80426 100644
--- a/lisp/utf-2000/Ideograph-R001-One.el
+++ b/lisp/utf-2000/Ideograph-R001-One.el
@@ -464,18 +464,20 @@
     (=ks-x1001		. #x5D55)	; ø»‰³ˆ
     ))
 (define-char
-  '((ideographic-	(:radical	1 ; ⼀
-			 :strokes	3
-			 :total-strokes	4
-			 :sources	(ucs cns-11643 morohashi-daikanwa))
-			(:radical	1 ; ⼀
-			 :strokes	2
-			 :total-strokes	3
-			 :sources	(gt)))
+  '((ideographic-radical . 1)	; ⼀
+    (ideographic-strokes@ucs . 3)
+    (total-strokes@ucs	     . 4)
+    (ideographic-strokes@ucs*sources
+     daikanwa ucs)
+    (total-strokes@ucs*sources
+     cns11643)
+    (ideographic-strokes@gt . 2)
+    (total-strokes@gt	    . 3)
     (->synonyms
-     (:char	((=daikanwa	     . 30212)	; ø¸‡˜„
-		 )
-      :sources	(morohashi-daikanwa)))
+     ((=daikanwa	  . 30212)	; ø¸‡˜„
+      ))
+    (->synonyms*sources
+     shuowen guangyun daikanwa)
     (hanyu-dazidian	1 5 3)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")