(K0-5B42): Moved into U+9F90; unify JC3-70AA.

[chise/xemacs-chise.git-] / lisp / utf-2000 / Ideograph-R020-Wrap.el

diff --git a/lisp/utf-2000/Ideograph-R020-Wrap.el b/lisp/utf-2000/Ideograph-R020-Wrap.el
index 44402e9..a4111c7 100644 (file)
--- a/lisp/utf-2000/Ideograph-R020-Wrap.el
+++ b/lisp/utf-2000/Ideograph-R020-Wrap.el
@@ -232,8 +232,8 @@
   '((ideographic-radical . 20) ; ⼓
     (ideographic-strokes . 2)
     (total-strokes      . 4)
-    (->same-ideograph
-     ((ideographic-radical . 4)        ; ⼃
+    (->same
+     ((=gt               . 00176)      ; ������
       (=daikanwa         . 00129)      ; �����
       ))
     (ideographic-structure
@@ -442,10 +442,11 @@
     (ideographic-strokes . 3)
     (total-strokes      . 5)
     (->ideographic-variants
-     (:char    ((shinjigen-1        . 772)
-                (=ucs               . #x5306)  ; 匆
-                )
-      :sources (shinjigen-1)))
+     ((shinjigen-1       . 772)
+      (=ucs              . #x5306)     ; 匆
+      ))
+    (->ideographic-variants*sources
+     shinjigen-1)
     (ideographic-structure
      ((name              . "IDEOGRAPHIC DESCRIPTION CHARACTER OVERLAID")
       (=ucs              . #x2FFB)     ; ⿻
@@ -583,6 +584,7 @@
       ))
     (=big5             . #xCA71)       ; ������
     (=daikanwa         . 02515)        ; �����
+    (=ucs@big5         . #x5309)       ; ������
     ))
 (define-char
   '((morohashi-daikanwa        2515 0 2)