(quail-show-kbd-layout): Bug fix for the

case that TRANSLATION is a cons.

diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index 69b968aed36598deb9fafe824e09bf8545c05117..69b8982a7bd418e00dafa44f5e47a2f262b990aa 100644 (file)
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -1869,7 +1869,7 @@ key               binding
            (if (integerp translation)
                (insert translation)
              (if (consp translation)
-                 (insert (aref (cdr translation) (car translation)))
+                 (insert (aref (cdr translation) (car (car translation))))
                (let ((last-command-event ch))
                  (self-insert-command 1)))))))
       (setq i (1+ i))))