From: tomo <tomo>
Date: Tue, 9 Jan 2007 13:56:31 +0000 (+0000)
Subject: (U-00022001): Use `->subsumptive'.
X-Git-Tag: r21-4-19-chise-0_23-4^20~242
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=36ce72d1c3babc2dc8db63881b9677086c29eb09;p=chise%2Fxemacs-chise.git

(U-00022001): Use `->subsumptive'.
(C6-5C49): Map to U-0002F882; add `<-original' for U+5DE2.
---

diff --git a/lisp/utf-2000/Ideograph-R047-River.el b/lisp/utf-2000/Ideograph-R047-River.el
index 7d59f36..727f378 100644
--- a/lisp/utf-2000/Ideograph-R047-River.el
+++ b/lisp/utf-2000/Ideograph-R047-River.el
@@ -484,18 +484,32 @@
   '((ideographic-radical . 47)	; â¼®
     (ideographic-strokes . 9)
     (total-strokes	 . 12)
-    (hanyu-dazidian	2 1098 14)
     (=ucs		. #x22001)	; 𢀁
-    (=cns11643-5	. #x3776)	; &I-C5-3776; [23-86]
-    (=daikanwa		. 08699)	; &I-M-08699;
-    (=hanziku-3		. #xE05F)	; &I-HZK03-E05F;
+    (->subsumptive
+     ((=daikanwa	  . 08699)	; &M-08699;
+      )
+     ((=ucs@iso		  . #x22001)	; &U-00022001;
+      )
+     ((hanyu-dazidian	  2 1098 14)
+      (=hanziku-3	  . #xE05F)	; &HZK03-E05F;
+      )
+     ((=cns11643-5	  . #x3776)	; &C5-3776; [23-86]
+      ))
     ))
 (define-char
-  '((ideographic-radical . 47)	; â¼®
+  '((=>ucs*		. #x5DE2)	; å·¢
+    (ideographic-radical . 47)	; â¼®
     (ideographic-strokes . 11)
     (total-strokes	 . 14)
-    (=cns11643-6	. #x5C49)	; &M-08700; [60-41]
+    (=ucs		. #x2F882)	; 巢
+    (=cns11643-6	. #x5C49)	; &I-C6-5C49; [60-41]
     (=daikanwa		. 08700)	; &I-M-08700;
+    (<-original
+     ((=ucs		  . #x5DE2)	; å·¢
+      (=daikanwa	  . 08696)	; &I-M-08696;
+      ))
+    (<-original*sources
+     zhengzitong daikanwa)
     ))
 (define-char
   '((ideographic-radical . 47)	; â¼®