(GT-K00031): Unify BC-89C7.

diff --git a/lisp/utf-2000/Ideograph-R004-Slash.el b/lisp/utf-2000/Ideograph-R004-Slash.el
index 4cdb862..034c4d8 100644 (file)
--- a/lisp/utf-2000/Ideograph-R004-Slash.el
+++ b/lisp/utf-2000/Ideograph-R004-Slash.el
@@ -147,13 +147,16 @@
          ))
        ))
       )
-     ((=gt-k             . 00031)      ; &GT-K00031;
-      (=gt-pj-k1         . #x302F)     ; &GT-K00031; [16-15]
+     ((=big5-cdp         . #x89C7)     ; &CDP-89C7;
+      (=gt-k             . 00031)      ; &I-GT-K00031;
+      (=gt-pj-k1         . #x302F)     ; &CDP-89C7; [16-15]
       (->subsumptive
        ((==daijiten        . 00073)    ; &g2-DJT-00073;
        )
        ((==gt-k                    . 00031)    ; &g2-GT-K00031;
        (==gt-pj-k1         . #x302F)   ; &g2-GT-K00031; [16-15]
+       )
+       ((==big5-cdp        . #x89C7)   ; &g2-CDP-89C7;
        ))
       ))
     ))