(U+37B7): Use `->subsumptive'.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R045-Sprout.el

diff --git a/lisp/utf-2000/Ideograph-R045-Sprout.el b/lisp/utf-2000/Ideograph-R045-Sprout.el
index 336960d..3f9113b 100644 (file)
--- 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)      ; 𡴈