X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R180-Sound.el;h=85e7ccb8b86ca79599780f13ddd5fcba4107e682;hb=6a32f6d388f5b72ace3206b2e2c9703074a4116c;hp=b40318b3410cec621f00ca491776a02544bbb05c;hpb=743e2bbf54823a9a41391268e02d8fbf963ea1e5;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/Ideograph-R180-Sound.el b/lisp/utf-2000/Ideograph-R180-Sound.el
index b40318b..85e7ccb 100644
--- a/lisp/utf-2000/Ideograph-R180-Sound.el
+++ b/lisp/utf-2000/Ideograph-R180-Sound.el
@@ -29,6 +29,7 @@
     (=ucs@unicode	. #x97F3)	; &GT-58109;
     (=jis-x0208		. #x323B)	; &GT-58109; [18-27]
     (=gb2312		. #x5274)	; &I-G0-5274; [50-84]
+    (=ks-x1001		. #x6B65)	; &I-K0-6B65; [75-69]
     (=jis-x0213-1	. #x323B)	; &I-JX1-323B; [18-27]
     (=gt		. 58109)	; &I-GT-58109;
     (=gt-k		. 05029)	; &I-GT-K05029;
@@ -36,7 +37,7 @@
     (->subsumptive
      ((==ucs@jis	  . #x97F3)	; &R-GT-58109;
       (==ucs@ks		  . #x97F3)	; &R-GT-58109;
-      (=ks-x1001	  . #x6B65)	; &R-GT-58109; [75-69]
+      (==ks-x1001	  . #x6B65)	; &R-GT-58109; [75-69]
       (==jis-x0208	  . #x323B)	; &R-GT-58109; [18-27]
       (==jis-x0213-1	  . #x323B)	; &R-GT-58109; [18-27]
       (==gt		  . 58109)	; &R-GT-58109;
@@ -980,9 +981,10 @@
     (ideographic-radical . 180)	; â¾³
     (ideographic-strokes . 13)
     (total-strokes	 . 22)
-    (=ucs@unicode	. #x9800)	; &UU+9800;
+    (=ucs@unicode	. #x9800)	; &K0-7B61;
+    (=ks-x1001		. #x7B61)	; &K0-7B61; [91-65]
     (->subsumptive
-     ((=ks-x1001	  . #x7B61)	; &K0-7B61; [91-65]
+     ((==ks-x1001	  . #x7B61)	; &R-K0-7B61; [91-65]
       )
      ((==ucs@unicode	  . #x9800)	; &R-UU+9800;
       ))