From: tomo <tomo>
Date: Fri, 10 Sep 2010 06:18:53 +0000 (+0000)
Subject: (U+6691): Unify J97-3D6B.
X-Git-Tag: chise-base-0_25-1^20~134
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=5b961252107439cddc0807a6885513515d2f68da;p=chise%2Fxemacs-chise.git-

(U+6691): Unify J97-3D6B.
(parent of JX1-7543): Add `=>>ucs@jis', `=>>ucs@ks', `=>>ucs@cns' and
`=>>jis-x0213-1'.
---

diff --git a/lisp/utf-2000/Ideograph-R072-Sun.el b/lisp/utf-2000/Ideograph-R072-Sun.el
index 1a39802..d0edaf3 100644
--- a/lisp/utf-2000/Ideograph-R072-Sun.el
+++ b/lisp/utf-2000/Ideograph-R072-Sun.el
@@ -4655,6 +4655,7 @@
 (define-char
   '((ideographic-radical . 72)	; ⽇
     (=ucs		. #x6691)	; 暑
+    (=>jis-x0208@1997	. #x3D6B)	; 暑 [29-75]
     (=big5		. #xB4BB)	; &I-B-B4BB;
     ))
 (define-char
@@ -5091,13 +5092,13 @@
   '((<-denotational
      ((=ucs		  . #x6691)	; 暑
       ))
-    (=>ucs*		. #x6691)	; 暑
-    (=>ucs@cns		. #x2F8CF)	; 暑
-    (=>ucs@jis		. #xFA43)	; 暑
-    (=>ucs@ks		. #x6691)	; 暑
     (ideographic-radical . 72)	; ⽇
     (ideographic-strokes . 9)
     (total-strokes	 . 13)
+    (=>>ucs@jis		. #xFA43)	; &G-JX1-7543;
+    (=>>ucs@ks		. #x6691)	; &G-JX1-7543;
+    (=>>ucs@cns		. #x2F8CF)	; &G-JX1-7543;
+    (=>>jis-x0213-1	. #x7543)	; &G-JX1-7543; [85-35]
     (->subsumptive
      ((=>ucs*		  . #x6691)	; 暑
       (=ucs		  . #xFA43)	; 暑