From 34ec015df4bc073ac0595ad5bde52e3a132e0e93 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Thu, 3 Feb 2005 13:10:32 +0000
Subject: [PATCH] (U+37B7): Use `->subsumptive'.

---
 lisp/utf-2000/Ideograph-R045-Sprout.el |    8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R045-Sprout.el b/lisp/utf-2000/Ideograph-R045-Sprout.el
index 336960d..3f9113b 100644
--- a/lisp/utf-2000/Ideograph-R045-Sprout.el
+++ b/lisp/utf-2000/Ideograph-R045-Sprout.el
@@ -180,8 +180,12 @@
     (ideographic-strokes . 4)
     (total-strokes	 . 7)
     (=ucs		. #x37B7)	; 㞷
-    (=cns11643-4	. #x2376)	; &I-C4-2376; [03-86]
-    (=daikanwa		. 07840)	; &I-M-07840;
+    (->subsumptive
+     ((=cns11643-4	  . #x2376)	; &M-07840; [03-86]
+      (=daikanwa	  . 07840)	; &I-M-07840;
+      )
+     ((=ucs@unicode	  . #x37B7)	; &UU+37B7;
+      ))
     ))
 (define-char
   '((=>ucs		. #x21D08)	; 𡴈
-- 
1.7.10.4