X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git;a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R060-Step.el;h=5e0ea4cbc0c8c4847f9ac113b47a5e30ca912ff4;hp=75d26b6f94416d44405c8f480a895befaff699a0;hb=0f964bd4c097a1e6bf38d0b3664fe8e5f9d73f12;hpb=c23f2bdb52b8779bbe4d494cc3f29f515c2c23bb

diff --git a/lisp/utf-2000/Ideograph-R060-Step.el b/lisp/utf-2000/Ideograph-R060-Step.el
index 75d26b6..5e0ea4c 100644
--- a/lisp/utf-2000/Ideograph-R060-Step.el
+++ b/lisp/utf-2000/Ideograph-R060-Step.el
@@ -1150,20 +1150,23 @@
     (ideographic-strokes . 7)
     (total-strokes	 . 10)
     (=ucs		. #x224F5)	; 𢓵
-    (=daikanwa		. 10123)	; &I-M-10123;
-    ))
-(define-char
-  '((=>ucs		. #x224F5)	; 𢓵
-    (morohashi-daikanwa	10123 0 0)
-    (ideographic-radical . 60)	; â¼»
-    (ideographic-strokes . 7)
-    (total-strokes	 . 10)
-    (=cns11643-5	. #x2D4A)	; &C5-2D4A; [13-42]
+    (->subsumptive
+     ((=daikanwa	  . 10123)	; &M-10123;
+      (=ucs@iso		  . #x224F5)	; &M-10123;
+      )
+     ((=cns11643-5	  . #x2D4A)	; &C5-2D4A; [13-42]
+      ))
     ))
 (define-char
   '((ideographic-radical . 60)	; â¼»
     (ideographic-strokes . 7)
     (total-strokes	 . 10)
+    (<-ancient
+     ((=ks-x1001	  . #x7757)	; &M-38892; [87-55]
+      (=daikanwa	  . 38892)	; &I-M-38892;
+      ))
+    (<-ancient*sources
+     zihui-bei daikanwa)
     (=ucs		. #x224F6)	; 𢓶
     (=cns11643-6	. #x3749)	; &I-C6-3749; [23-41]
     (=daikanwa		. 10124)	; &I-M-10124;