From: Kenichi Handa <handa@m17n.org>
Date: Tue, 21 Apr 2009 02:11:25 +0000 (+0000)
Subject: (unidata-get-decomposition): Fix previous change.
X-Git-Tag: emacs-pretest-23.0.93~83
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0b4ff5dfa0bc860ae9296cb691b93f13b019b273;p=emacs.git

(unidata-get-decomposition): Fix previous change.
---

diff --git a/admin/ChangeLog b/admin/ChangeLog
index 292ea24516c..5ab169c0df8 100644
--- a/admin/ChangeLog
+++ b/admin/ChangeLog
@@ -1,3 +1,8 @@
+2009-04-21  Kenichi Handa  <handa@m17n.org>
+
+	* unidata/unidata-gen.el (unidata-get-decomposition): Fix previous
+	change.
+
 2009-04-17  Kenichi Handa  <handa@m17n.org>
 
 	* unidata/unidata-gen.el (unidata-get-decomposition): Adjust
diff --git a/admin/unidata/unidata-gen.el b/admin/unidata/unidata-gen.el
index 7fecb999d35..cd2343b9d03 100644
--- a/admin/unidata/unidata-gen.el
+++ b/admin/unidata/unidata-gen.el
@@ -828,8 +828,8 @@ Property value is a character."
 	  (L (+ #x1100 (/ char 588)))
 	  ;; V = VBase + (SIndex % NCount) * TCount
 	  (V (+ #x1161 (/ (% char 588) 28)))
-	  ;; LV = SBase + (SIndex / NCount) * NCount
-	  (LV (+ #xAC00 (* (/ char 588) 588)))
+	  ;; LV = SBase + (SIndex / TCount) * TCount
+	  (LV (+ #xAC00 (* (/ char 28) 28)))
 	  ;; T = TBase + SIndex % TCount
 	  (T (+ #x11A7 (% char 28))))
       (if (= T #x11A7)