(CU+805A): Use A-CU+805A instead of U+805A as the mother.

diff --git a/lisp/utf-2000/Ideograph-R128-Ear.el b/lisp/utf-2000/Ideograph-R128-Ear.el
index ae93687..621d1b6 100644 (file)
--- a/lisp/utf-2000/Ideograph-R128-Ear.el
+++ b/lisp/utf-2000/Ideograph-R128-Ear.el
@@ -1906,7 +1906,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=ucs              . #x805A)     ; 聚
+     ((=>ucs@cns         . #x805A)     ; &A-CU+805A;
       ))
     (ideographic-radical . 128)        ; ⽿
     (ideographic-strokes . 8)
@@ -1917,14 +1917,9 @@
       )
      ((=ucs              . #x53D6)     ; 取
       )
-     ((=big5-cdp         . #x8C76)     ; &CDP-8C76;
-      ))
-    (=ucs@cns          . #x805A)       ; &C1-6A4D;
-    (=cns11643-1       . #x6A4D)       ; &C1-6A4D; [74-45]
-    (->subsumptive
-     ((==ucs@cns         . #x805A)     ; &g2-CU+805A;
-      (==cns11643-1      . #x6A4D)     ; &g2-CU+805A; [74-45]
+     ((=ucs-itaiji-001   . #x343A)     ; &U-i001+343A;
       ))
+    (===hng-kar                . 03190)        ; &HNG018-03190;
     ))
 (define-char
   '((<-denotational
@@ -1939,9 +1934,14 @@
       )
      ((=ucs              . #x53D6)     ; 取
       )
-     ((=ucs-itaiji-001   . #x343A)     ; &U-i001+343A;
+     ((=big5-cdp         . #x8C76)     ; &CDP-8C76;
+      ))
+    (=ucs@cns          . #x805A)       ; &C1-6A4D;
+    (=cns11643-1       . #x6A4D)       ; &C1-6A4D; [74-45]
+    (->subsumptive
+     ((==ucs@cns         . #x805A)     ; &g2-CU+805A;
+      (==cns11643-1      . #x6A4D)     ; &g2-CU+805A; [74-45]
       ))
-    (===hng-kar                . 03190)        ; &HNG018-03190;
     ))
 (define-char
   '((ideographic-radical . 128)        ; ⽿