support rendering of wider range of combinging characters by ftfont backend

[gnu-emacs] / lisp / language / hanja-util.el

diff --git a/lisp/language/hanja-util.el b/lisp/language/hanja-util.el
index d1d8f7682f520b91435c326582caf5d034bc84df..c9501d2ef8fbcc07daeb677baa7fb16dbeb14e56 100644 (file)
--- a/lisp/language/hanja-util.el
+++ b/lisp/language/hanja-util.el
@@ -1,5 +1,7 @@
 ;;; hanja-util.el --- Korean Hanja util module  -*- coding: utf-8 -*-
 
+;; Copyright (C) 2008-2015 Free Software Foundation, Inc.
+
 ;; Author: Jihyun Cho <jihyun.jo@gmail.com>
 ;; Keywords: multilingual, input method, Korean, Hanja
 
@@ -37,7 +39,7 @@ character.  This variable is initialized by `hanja-init-load'.")
 (defun hanja-init-load ()
   "Initialize `hanja-table' (which see)."
   (when (not hanja-table)
-    (message "Hanja table loading..")
+    (message "Hanja table loading...")
     (setq hanja-table (make-char-table nil))
     (mapc
      (lambda (x) (aset hanja-table (car x) (cdr x)))
@@ -6436,7 +6438,7 @@ character.  This variable is initialized by `hanja-init-load'.")
 
 ;; List of current conversion status.
 ;; The first element is the strating position of shown list.
-;; It is a group number each splited by `hanja-list-width'.
+;; It is a group number each split by `hanja-list-width'.
 ;; The second element is the position of selected element.
 ;; The third element is a list of suitable Hanja candidate.
 (defvar hanja-conversions
@@ -6583,11 +6585,12 @@ The value is a hanja character that is selected interactively."
                     (cmd (lookup-key hanja-keymap seq)))
                (if (functionp cmd)
                    (funcall cmd)
-                 (setq unread-command-events (listify-key-sequence seq))
+                 (setq unread-command-events
+                        (nconc (listify-key-sequence seq)
+                               unread-command-events))
                  (throw 'exit-input-loop nil))))))
       (setq hanja-conversions nil))))
 
 (provide 'hanja-util)
 
-;; arch-tag: 3358afb4-c63f-472f-989a-5249129924d1
 ;;; hanja-util.el ends here