From: tomo <tomo>
Date: Wed, 16 Jun 2004 13:20:50 +0000 (+0000)
Subject: Rename `<-original-ideograph' to `<-original'.
X-Git-Tag: r21-4-14-chise-0_21-29-si-original^2~43
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=a2396bb82df0a4a66fb5ff821bf1c07b866eca9b;p=chise%2Fxemacs-chise.git-

Rename `<-original-ideograph' to `<-original'.
(U+7714): Use `->subsumptive'.
---

diff --git a/lisp/utf-2000/Ideograph-R109-Eye.el b/lisp/utf-2000/Ideograph-R109-Eye.el
index 127f2e0..44c42ce 100644
--- a/lisp/utf-2000/Ideograph-R109-Eye.el
+++ b/lisp/utf-2000/Ideograph-R109-Eye.el
@@ -1290,10 +1290,10 @@
     (ideographic-radical . 109)	; ⽬
     (ideographic-strokes . 4)
     (total-strokes	 . 9)
-    (<-original-ideograph
+    (<-original
      ((=daikanwa	  . 01473)	; &I-M-01473;
       ))
-    (<-original-ideograph*sources
+    (<-original*sources
      daikanwa)
     (=ucs		. #x2F942)	; 𥃲
     (=cns11643-6	. #x333D)	; &I-C6-333D; [19-29]
@@ -2160,26 +2160,18 @@
   '((ideographic-radical . 109)	; ⽬
     (ideographic-strokes . 5)
     (total-strokes	 . 10)
-    (<-original-ideograph
-     ((=daikanwa	  . 23221)	; &I-M-23221;
-      ))
-    (<-original-ideograph*sources
-     daikanwa)
     (=ucs		. #x7714)	; 眔
-    (=daikanwa		. 49364)	; &I-M-49364;
-    ))
-(define-char
-  '((=>ucs		. #x7714)	; 眔
-    (morohashi-daikanwa	49364 0 0)
-    (ideographic-radical . 109)	; ⽬
-    (ideographic-strokes . 5)
-    (total-strokes	 . 10)
-    (<-original-ideograph
-     ((=daikanwa	  . 23221)	; &I-M-23221;
+    (->subsumptive
+     ((<-original
+       ((=daikanwa	    . 23221)	; &I-M-23221;
+	))
+      (<-original*sources
+       daikanwa)
+      (=daikanwa	  . 49364)	; &M-49364;
+      (=ucs@unicode	  . #x7714)	; &M-49364;
+      )
+     ((=cns11643-4	  . #x2E55)	; &C4-2E55; [14-53]
       ))
-    (<-original-ideograph*sources
-     daikanwa)
-    (=cns11643-4	. #x2E55)	; &C4-2E55; [14-53]
     ))
 (define-char
   '((ideographic-radical . 109)	; ⽬