From: tomo <tomo>
Date: Sat, 11 Aug 2007 16:51:19 +0000 (+0000)
Subject: (U-00023995): Use `->subsumptive'.
X-Git-Tag: r21-4-19-chise-0_23-5^20~2
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=bba5e5c09dfe46832cdd6707fe6afc9aa7881ba4;p=chise%2Fxemacs-chise.git.1

(U-00023995): Use `->subsumptive'.
---

diff --git a/lisp/utf-2000/Ideograph-R077-Stop.el b/lisp/utf-2000/Ideograph-R077-Stop.el
index 765bb0d..addb568 100644
--- a/lisp/utf-2000/Ideograph-R077-Stop.el
+++ b/lisp/utf-2000/Ideograph-R077-Stop.el
@@ -1584,17 +1584,20 @@
   '((ideographic-radical . 77)	; ⽌
     (ideographic-strokes . 11)
     (total-strokes	 . 15)
-    (hanyu-dazidian	2 1445 3)
     (=ucs		. #x23995)	; 𣦕
-    (=cns11643-7	. #x2425)	; &I-C7-2425; [04-05]
-    (=daikanwa		. 16337)	; &I-M-16337;
-    (=hanziku-4		. #xD3D2)	; &I-HZK04-D3D2;
-    (<-same
-     ((=ucs		  . #x230B8)	; 𣂸
-      (=daikanwa	  . 13583)	; &I-M-13583;
+    (->subsumptive
+     ((hanyu-dazidian	  2 1445 3)
+      (=cns11643-7	  . #x2425)	; &M-16337; [04-05]
+      (=daikanwa	  . 16337)	; &I-M-16337;
+      (=hanziku-4	  . #xD3D2)	; &I-HZK04-D3D2;
+      (=ucs@iso		  . #x23995)	; &M-16337;
+      (<-same
+       ((=ucs		    . #x230B8)	; 𣂸
+	(=daikanwa	    . 13583)	; &I-M-13583;
+	))
+      (<-same*sources
+       zihui-bu daikanwa)
       ))
-    (<-same*sources
-     zihui-bu daikanwa)
     ))
 (define-char
   '((ideographic-radical . 77)	; ⽌