From 93890698e8522102da1e7fd1e3db3ee09dc75862 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Wed, 6 Nov 2002 23:36:10 +0000 Subject: [PATCH] (quail-input-string-to-events): Use keyboard-translate-table, not translation-table-for-input. --- lisp/international/quail.el | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/lisp/international/quail.el b/lisp/international/quail.el index c4fcb1da6c4..8913195fcf1 100644 --- a/lisp/international/quail.el +++ b/lisp/international/quail.el @@ -1279,9 +1279,11 @@ Do so while interleaving with the following special events: (let* ((events (mapcar (lambda (c) ;; This gives us the chance to unify on input - ;; (e.g. using ucs-tables.el). - (or (and translation-table-for-input - (aref translation-table-for-input c)) + ;; (e.g. using ucs-tables.el). Fixme: The result + ;; of Quail input doesn't currently go through + ;; `keyboard-translate-table'. + (or (and (char-table-p keyboard-translate-table) + (aref keyboard-translate-table c)) c)) str)) (len (length str)) -- 2.39.2