Apply new glyph-image conventions for `ks-x1001'.

diff --git a/lisp/utf-2000/Ideograph-R070-Square.el b/lisp/utf-2000/Ideograph-R070-Square.el
index 39d4c51..75f9d8a 100644 (file)
--- a/lisp/utf-2000/Ideograph-R070-Square.el
+++ b/lisp/utf-2000/Ideograph-R070-Square.el
@@ -165,6 +165,7 @@
       (=adobe-japan1-0   . 01305)      ; &AJ1-01305;
       (=jis-x0208        . #x3177)     ; &I-J90-3177; [17-87]
       (=gb2312           . #x6C36)     ; &I-G0-6C36; [76-22]
+      (=ks-x1001         . #x655A)     ; &I-K0-655A; [69-58]
       (=jis-x0213-1      . #x3177)     ; &I-JX1-3177; [17-87]
       (=gt               . 17222)      ; &I-GT-17222;
       (=gt-k             . 03641)      ; &I-GT-K03641;
@@ -173,7 +174,7 @@
        ((==ucs@jis         . #x65BC)   ; &R-AJ1-01305;
        (==ucs@ks           . #x65BC)   ; &R-AJ1-01305;
        (==adobe-japan1-0   . 01305)    ; &R-AJ1-01305;
-       (=ks-x1001          . #x655A)   ; &I-K0-655A; [69-58]
+       (==ks-x1001         . #x655A)   ; &R-AJ1-01305; [69-58]
        (==jis-x0208        . #x3177)   ; &R-AJ1-01305; [17-87]
        (==jis-x0213-1      . #x3177)   ; &R-AJ1-01305; [17-87]
        (==gt               . 17222)    ; &R-AJ1-01305;
@@ -308,8 +309,8 @@
        (<-ancient
         ((==ucs@jis          . #x65C1) ; &R-GT-17242;
          (==ucs@ks           . #x65C1) ; &R-GT-17242;
-         (=ks-x1001          . #x5B31) ; &R-GT-17242; [59-17]
-         (=daikanwa          . 13637)  ; &I-M-13637;
+         (==jis-x0208        . #x5A55) ; &R-GT-17242; [58-53]
+         (=daikanwa          . 13637)  ; &R-GT-17242;
          ))
        (<-ancient*sources
         shuowen daikanwa)
@@ -379,6 +380,7 @@
      ((=ucs@unicode      . #x65C1)     ; &GT-17242;
       (=jis-x0208        . #x5A55)     ; &GT-17242; [58-53]
       (=gb2312           . #x4554)     ; &I-G0-4554; [37-52]
+      (=ks-x1001         . #x5B31)     ; &I-K0-5B31; [59-17]
       (=jis-x0213-1      . #x5A55)     ; &I-JX1-5A55; [58-53]
       (=gt               . 17242)      ; &I-GT-17242;
       (=gt-k             . 06597)      ; &I-GT-K06597;
@@ -386,12 +388,12 @@
       (->subsumptive
        ((==ucs@jis         . #x65C1)   ; &R-GT-17242;
        (==ucs@ks           . #x65C1)   ; &R-GT-17242;
-       (=ks-x1001          . #x5B31)   ; &R-GT-17242; [59-17]
+       (==ks-x1001         . #x5B31)   ; &R-GT-17242; [59-17]
        (==jis-x0208        . #x5A55)   ; &R-GT-17242; [58-53]
        (==jis-x0213-1      . #x5A55)   ; &R-GT-17242; [58-53]
        (==gt               . 17242)    ; &R-GT-17242;
        (==gt-k             . 06597)    ; &R-GT-17242;
-       (=daikanwa          . 13637)    ; &I-M-13637;
+       (=daikanwa          . 13637)    ; &R-GT-17242;
        )
        ((==ucs@unicode     . #x65C1)   ; &C1-5569;
        (==gb2312           . #x4554)   ; &C1-5569; [37-52]
@@ -837,6 +839,7 @@
      ((=ucs@unicode      . #x65CF)     ; &GT-17258;
       (=jis-x0208        . #x4232)     ; &GT-17258; [34-18]
       (=gb2312           . #x5765)     ; &I-G0-5765; [55-69]
+      (=ks-x1001         . #x7069)     ; &I-K0-7069; [80-73]
       (=jis-x0213-1      . #x4232)     ; &I-JX1-4232; [34-18]
       (=gt               . 17258)      ; &I-GT-17258;
       (=gt-k             . 07819)      ; &I-GT-K07819;
@@ -844,12 +847,12 @@
       (->subsumptive
        ((==ucs@jis         . #x65CF)   ; &R-GT-17258;
        (==ucs@ks           . #x65CF)   ; &R-GT-17258;
-       (=ks-x1001          . #x7069)   ; &R-GT-17258; [80-73]
+       (==ks-x1001         . #x7069)   ; &R-GT-17258; [80-73]
        (==jis-x0208        . #x4232)   ; &R-GT-17258; [34-18]
        (==jis-x0213-1      . #x4232)   ; &R-GT-17258; [34-18]
        (==gt               . 17258)    ; &R-GT-17258;
        (==gt-k             . 07819)    ; &R-GT-17258;
-       (=daikanwa          . 13661)    ; &I-M-13661;
+       (=daikanwa          . 13661)    ; &R-GT-17258;
        (=shinjigen         .  3253)    ; &R-GT-17258;
        )
        ((==ucs@unicode     . #x65CF)   ; &R-UU+65CF;