X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R060-Step.el;h=5f0e25d24cfc61e37b6617c0ea3c02b99e4d2aca;hb=6e19fc71f6c7c22ecc2b1230aed517ad7f756739;hp=28b2a5d23fe0a1dd8953eec50c90275b99afb78e;hpb=5da5e4236c3f40625d7f781e661d1697388ca748;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/Ideograph-R060-Step.el b/lisp/utf-2000/Ideograph-R060-Step.el
index 28b2a5d..5f0e25d 100644
--- a/lisp/utf-2000/Ideograph-R060-Step.el
+++ b/lisp/utf-2000/Ideograph-R060-Step.el
@@ -1680,11 +1680,24 @@
     (=cns11643-6	. #x3749)	; &I-C6-3749; [23-41]
     (=daikanwa		. 10124)	; &I-M-10124;
     (<-ancient
-     ((=ks-x1001	  . #x7757)	; &M-38892; [87-55]
+     ((=ucs@ks		  . #x901A)	; &AJ1-13939;
+      (=adobe-japan1-4	  . 13939)	; &AJ1-13939;
       (=daikanwa	  . 38892)	; &I-M-38892;
       ))
     (<-ancient*sources
      zihui-bei daikanwa)
+    (->subsumptive
+     ((==ucs@iso	  . #x224F6)	; &g2-M-10124;
+      (==cns11643-6	  . #x3749)	; &g2-M-10124; [23-41]
+      (==daikanwa	  . 10124)	; &g2-M-10124;
+      (->subsumptive
+       ((===daikanwa	    . 10124)	; &R-M-10124;
+	)
+       ((===cns11643-6	    . #x3749)	; &R-C6-3749; [23-41]
+	)
+       ((===ucs@iso	    . #x224F6)	; &R-U-000224F6;
+	))
+      ))
     ))
 (define-char
   '((ideographic-radical . 60)	; â¼»
@@ -3314,8 +3327,8 @@
 	)
        ((=ucs		    . #x5F73)	; å½³
 	)
-       ((=ucs@ks	    . #x5EFA)	; &AJ1-13436;
-	(=adobe-japan1-4    . 13436)	; &AJ1-13436;
+       ((==ucs@ks	    . #x5EFA)	; &g2-AJ1-13436;
+	(==adobe-japan1-4   . 13436)	; &g2-AJ1-13436;
 	))
       (==ucs@jis	  . #x5FA4)	; &g2-AJ1-14527;
       (==adobe-japan1-4	  . 14527)	; &g2-AJ1-14527;
@@ -3334,8 +3347,8 @@
 	)
        ((=ucs		    . #x5F73)	; å½³
 	)
-       ((=ucs@unicode	    . #x5EFA)	; &AJ1-01872;
-	(=adobe-japan1-0    . 01872)	; &AJ1-01872;
+       ((==ucs@unicode	    . #x5EFA)	; &g2-AJ1-01872;
+	(==adobe-japan1-0   . 01872)	; &g2-AJ1-01872;
 	))
       (==ucs@unicode	  . #x5FA4)	; &g2-CB00735;
       (==ucs@JP/hanazono  . nil)