Complete `==ucs@ks'.

(C2-6F5F): Apply new glyph-image conventions for daikanwa.

diff --git a/lisp/utf-2000/Ideograph-R180-Sound.el b/lisp/utf-2000/Ideograph-R180-Sound.el
index 8b4a669..0b09120 100644 (file)
--- a/lisp/utf-2000/Ideograph-R180-Sound.el
+++ b/lisp/utf-2000/Ideograph-R180-Sound.el
@@ -966,12 +966,11 @@
     (ideographic-radical . 180)        ; ⾳
     (ideographic-strokes . 14)
     (total-strokes      . 23)
-    (=>>ucs@cns                . #x9800)       ; &C2-6F5F;
     (=ucs@cns          . #x9800)       ; &C2-6F5F;
     (=cns11643-2       . #x6F5F)       ; &C2-6F5F; [79-63]
-    (=>>daikanwa       . 43327)        ; &C2-6F5F;
+    (=daikanwa         . 43327)        ; &I-M-43327;
     (->subsumptive
-     ((=daikanwa         . 43327)      ; &M-43327;
+     ((==daikanwa        . 43327)      ; &R-M-43327;
       )
      ((==ucs@cns         . #x9800)     ; &R-CU+9800;
       (==cns11643-2      . #x6F5F)     ; &R-CU+9800; [79-63]
@@ -987,7 +986,8 @@
     (=ucs@unicode      . #x9800)       ; &K0-7B61;
     (=ks-x1001         . #x7B61)       ; &K0-7B61; [91-65]
     (->subsumptive
-     ((==ks-x1001        . #x7B61)     ; &R-K0-7B61; [91-65]
+     ((==ucs@ks                  . #x9800)     ; &R-K0-7B61;
+      (==ks-x1001        . #x7B61)     ; &R-K0-7B61; [91-65]
       )
      ((==ucs@unicode     . #x9800)     ; &R-UU+9800;
       ))