(hangul3-input-method-jong): Fix array indexing bug.

2 files changed, 6 insertions, 1 deletions

diff --git a/leim/ChangeLog b/leim/ChangeLog
index 3356354eb82..fabf0253ef5 100644
--- a/leim/ChangeLog
+++ b/leim/ChangeLog
@@ -1,3 +1,8 @@
+2008-08-10  Jihyun Cho  <jihyun.jo@gmail.com>
+
+        * quail/hangul.el (hangul3-input-method-jong): Fix array indexing
+        bug.
+
 2008-07-19  Juri Linkov  <juri@jurta.org>
 
         * quail/cyrillic.el ("cyrillic-translit"): Add two rules "//'" and
diff --git a/leim/quail/hangul.el b/leim/quail/hangul.el
index d46746e64f8..76ce625d292 100644
--- a/leim/quail/hangul.el
+++ b/leim/quail/hangul.el
@@ -333,7 +333,7 @@ Other parts are the same as a `hangul3-input-method-cho'."
                         'jong
                         (aref hangul-queue 4)
                         char)))))
-             (aset hangul-queue 6 char)))
+             (aset hangul-queue 5 char)))
       (hangul-insert-character hangul-queue)
     (if (zerop (apply '+ (append hangul-queue nil)))
         (hangul-insert-character (setq hangul-queue (vector 0 0 0 0 char 0)))