(J90-3F26): Add S1-6406.

(J83-3F26): Delete S2-6406.
(JC3-60D2): Add S{1|2}-6407.

diff --git a/lisp/utf-2000/Ideograph-R128-Ear.el b/lisp/utf-2000/Ideograph-R128-Ear.el
index c172a3c..73c1f7e 100644 (file)
--- a/lisp/utf-2000/Ideograph-R128-Ear.el
+++ b/lisp/utf-2000/Ideograph-R128-Ear.el
@@ -2782,7 +2782,8 @@
     (=ucs              . #x8077)       ; 職
     (=big5             . #xC2BE)       ; &I-B-C2BE;
     (->subsumptive
-     ((shinjigen-2       . 6406)
+     ((shinjigen-1       . 6406)
+      (shinjigen-2       . 6406)
       (=ks-x1001         . #x7245)     ; &GT-37781; [82-37]
       (=jis-x0208@1990   . #x3F26)     ; &I-J90-3F26; [31-06]
       (=gt               . 37781)      ; &I-GT-37781;
@@ -2792,14 +2793,15 @@
       )
      ((=cns11643-1       . #x772A)     ; &C1-772A; [87-10]
       )
-     ((shinjigen-2       . 6406)
-      (=jis-x0208@1978   . #x3F26)     ; &J83-3F26; [31-06]
+     ((=jis-x0208@1978   . #x3F26)     ; &J83-3F26; [31-06]
       (=jis-x0208@1983   . #x3F26)     ; &I-J83-3F26; [31-06]
       )
      ((=gb12345                  . #x5630)     ; &UU+8077; [54-16]
       (=ucs@unicode      . #x8077)     ; &UU+8077;
       )
-     ((=jef-china3       . #x60D2)     ; &JC3-60D2;
+     ((shinjigen-1       . 6407)
+      (shinjigen-2       . 6407)
+      (=jef-china3       . #x60D2)     ; &JC3-60D2;
       ))
     ))
 (define-char