From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sat, 19 Oct 2013 09:39:48 +0000 (+0900)
Subject: Apply new glyph-image conventions for `ks-x1001'.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=32e63b0aa4efd89cf5abf631c8aa807757b51790;p=chise%2Fxemacs-chise.git

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

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;
       ))