From 76122a3ffca5005cc9ef086102fdc3bb0206c65d Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Wed, 16 Jun 2004 17:50:15 +0000
Subject: [PATCH] (U+8294): Rename `<-original-ideograph' to `<-original'; use
 `->subsumptive'.

---
 lisp/utf-2000/Ideograph-R140-Grass.el |   27 ++++++++++++++++-----------
 1 file changed, 16 insertions(+), 11 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R140-Grass.el b/lisp/utf-2000/Ideograph-R140-Grass.el
index 2540b97..064d323 100644
--- a/lisp/utf-2000/Ideograph-R140-Grass.el
+++ b/lisp/utf-2000/Ideograph-R140-Grass.el
@@ -995,19 +995,24 @@
   '((ideographic-radical . 140)	; ⾋
     (ideographic-strokes . 3)
     (total-strokes	 . 9)
-    (<-original-ideograph
-     ((shinjigen-1	  . 816)
-      (=daikanwa	  . 02706)	; &I-M-02706;
-      ))
-    (<-original-ideograph*sources
-     shinjigen-1)
-    (shinjigen-1	. 817)
     (=ucs		. #x8294)	; 芔
-    (=jis-x0212		. #x5738)	; &I-JSP-5738; [55-24]
-    (=cns11643-2	. #x2D2D)	; &I-C2-2D2D; [13-13]
     (=big5		. #xD06A)	; &I-B-D06A;
-    (=daikanwa		. 30685)	; &I-M-30685;
-    (=jef-china3	. #x45C1)	; &I-JC3-45C1;
+    (->subsumptive
+     ((<-original
+       ((shinjigen-1	    . 816)
+	(=daikanwa	    . 02706)	; &I-M-02706;
+	))
+      (<-original*sources
+       shinjigen-1)
+      (shinjigen-1	  . 817)
+      (=jis-x0212	  . #x5738)	; &M-30685; [55-24]
+      (=cns11643-2	  . #x2D2D)	; &I-C2-2D2D; [13-13]
+      (=daikanwa	  . 30685)	; &I-M-30685;
+      (=jef-china3	  . #x45C1)	; &I-JC3-45C1;
+      (=ucs@jis		  . #x8294)	; &M-30685;
+      )
+     ((=ucs@unicode	  . #x8294)	; &UU+8294;
+      ))
     ))
 (define-char
   '((=>ucs		. #x8295)	; 芕
-- 
1.7.10.4