international/quail.el (quail-insert-kbd-layout): Fix the showing of untranslated characters.

1180f752 · Kenichi Handa · b9229673 · 1180f752 · 1180f752
Commit 1180f752 authored Jun 28, 2010 by Kenichi Handa
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 1 deletion

lisp/ChangeLog lisp/ChangeLog +5 -0

lisp/international/quail.el lisp/international/quail.el +1 -1

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
+2010-06-28  Kenichi Handa  <handa@m17n.org>
+
+	* international/quail.el (quail-insert-kbd-layout): Fix the
+	showing of untranslated characters.
+
 2010-06-28  Chong Yidong  <cyd@stupidchicken.com>
  
 	* simple.el (delete-active-region): New option.

--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -811,7 +811,7 @@ The format of KBD-LAYOUT is the same as `quail-keyboard-layout'."
 		      (setq translation (aref (cdr translation) 0))
 		    (setq translation " ")))
 	      (setq done-list (cons translation done-list)))
-	  (setq translation ch))
+	  (setq translation (aref kbd-layout i)))
 	(aset layout i translation))
      (setq i (1+ i)))