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

diff --git a/lisp/utf-2000/Ideograph-R167-Gold.el b/lisp/utf-2000/Ideograph-R167-Gold.el
index 7f40fc7..e7f18dc 100644 (file)
--- a/lisp/utf-2000/Ideograph-R167-Gold.el
+++ b/lisp/utf-2000/Ideograph-R167-Gold.el
@@ -11670,6 +11670,7 @@
     (->subsumptive
      ((=ucs@unicode      . #x93E1)     ; &GT-54837;
       (=jis-x0208        . #x3640)     ; &GT-54837; [22-32]
+      (=ks-x1001         . #x4C70)     ; &I-K0-4C70; [44-80]
       (=jis-x0213-1      . #x3640)     ; &I-JX1-3640; [22-32]
       (=gb12345                  . #x3E35)     ; &GT-54837; [30-21]
       (=gt               . 54837)      ; &I-GT-54837;
@@ -11677,11 +11678,11 @@
       (->subsumptive
        ((==ucs@jis         . #x93E1)   ; &R-GT-54837;
        (==ucs@ks           . #x93E1)   ; &R-GT-54837;
-       (=ks-x1001          . #x4C70)   ; &R-GT-54837; [44-80]
+       (==ks-x1001         . #x4C70)   ; &R-GT-54837; [44-80]
        (==jis-x0208        . #x3640)   ; &R-GT-54837; [22-32]
        (==jis-x0213-1      . #x3640)   ; &R-GT-54837; [22-32]
        (==gt               . 54837)    ; &R-GT-54837;
-       (=daikanwa          . 40812)    ; &I-M-40812;
+       (=daikanwa          . 40812)    ; &R-GT-54837;
        (=shinjigen         .  8727)    ; &R-GT-54837;
        )
        ((==ucs@unicode     . #x93E1)   ; &C1-7935;