From: tomo <tomo>
Date: Sun, 28 Dec 2003 06:06:52 +0000 (+0000)
Subject: (C4-213F): Use `<-original-ideograph*sources' instead of char-ref in
X-Git-Tag: r21-4-14-chise-0_21-17^2~142
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=774c8dfc5c0f82cdedcb566e245d285ae200e442;p=chise%2Fxemacs-chise.git.1

(C4-213F): Use `<-original-ideograph*sources' instead of char-ref in
`<-original-ideograph'.
---

diff --git a/lisp/utf-2000/Ideograph-R015-Ice.el b/lisp/utf-2000/Ideograph-R015-Ice.el
index 0204f20..d838725 100644
--- a/lisp/utf-2000/Ideograph-R015-Ice.el
+++ b/lisp/utf-2000/Ideograph-R015-Ice.el
@@ -176,9 +176,10 @@
       (=daikanwa	  . 00360)	; ø¸€…¨
       ))
     (<-original-ideograph
-     (:char	((=daikanwa	     . 01612)	; ø¸€™Œ
-		 )
-      :sources	(morohashi-daikanwa)))
+     ((=daikanwa	  . 01612)	; ø¸€™Œ
+      ))
+    (<-original-ideograph*sources
+     daikanwa)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs		  . #x2FF1)	; ⿱