From: tomo <tomo>
Date: Fri, 12 Mar 2004 15:14:24 +0000 (+0000)
Subject: (M-02134): Use `->identical' instead of `->same' for U-000202F4 =
X-Git-Tag: r21-4-14-chise-0_21-25-si-same^2~108
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=2a1157cb9250294d699be796ae13e98c213c067c;p=chise%2Fxemacs-chise.git-

(M-02134): Use `->identical' instead of `->same' for U-000202F4 =
M-00938; use `->same*sources' instead of using char-ref in `->same'.
(U+5292): Use `{->same|<-ancient-ideograph}*sources' instead of using
char-ref in `{->same|<-ancient-ideograph}'.
---

diff --git a/lisp/utf-2000/Ideograph-R018-Knife.el b/lisp/utf-2000/Ideograph-R018-Knife.el
index 44d95cc..9e5c8e4 100644
--- a/lisp/utf-2000/Ideograph-R018-Knife.el
+++ b/lisp/utf-2000/Ideograph-R018-Knife.el
@@ -5946,12 +5946,15 @@
     (ideographic-radical . 18)	; ⼑
     (ideographic-strokes . 10)
     (total-strokes	 . 12)
+    (->identical
+     ((=ucs		  . #x202F4)	; 𠋴
+      ))
     (->same
-     ((=daikanwa	  . 00938)	; ø¸€Žª
-      )
-     (:char	((=daikanwa	     . 00768)	; ø¸€Œ€
-		 )
-      :sources	(shuowen inkaiho morohashi-daikanwa)))
+     ((=ucs		  . #x5013)	; 倓
+      (=daikanwa	  . 00768)	; ø¸€Œ€
+      ))
+    (->same*sources
+     shuowen yunhai-bei daikanwa)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs		  . #x2FF0)	; â¿°
@@ -7202,7 +7205,8 @@
     (ideographic-strokes@cns . 8)
     (total-strokes	 . 14)
     (->same
-     ((=daikanwa	  . 26149)	; ø¸†˜¥
+     ((=ucs		  . #x7B9A)	; 箚
+      (=daikanwa	  . 26149)	; ø¸†˜¥
       ))
     (->same*sources
      kouin kangxi daikanwa)
@@ -7900,14 +7904,17 @@
     (ideographic-strokes . 14)
     (total-strokes	 . 16)
     (->same
-     (:char	((=daikanwa	     . 02228)	; ø¸€¢´
-		 )
-      :sources	(gyokuhen morohashi-daikanwa)))
+     ((=ucs		  . #x528D)	; 劍
+      (=daikanwa	  . 02228)	; ø¸€¢´
+      ))
+    (->same*sources
+     yupian daikanwa)
     (<-ancient-ideograph
-     (:char	((shinjigen-1	     . 653)
-		 (=daikanwa	     . 02228)	; ø¸€¢´
-		 )
-      :sources	(shinjigen-1)))
+     ((shinjigen-1	  . 653)
+      (=daikanwa	  . 02228)	; ø¸€¢´
+      ))
+    (<-ancient-ideograph*sources
+     shinjigen-1)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs		  . #x2FF0)	; â¿°