Mercurial > emacs
changeset 42085:5d63f6ad7711
(quail-input-string-to-events): Fix last change.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Sun, 16 Dec 2001 19:13:41 +0000 |
parents | 38fcd503c300 |
children | 1ff0e151fab0 |
files | lisp/international/quail.el |
diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/quail.el Sun Dec 16 18:36:50 2001 +0000 +++ b/lisp/international/quail.el Sun Dec 16 19:13:41 2001 +0000 @@ -1270,12 +1270,14 @@ Do so while interleaving with the following special events: \(compose-last-chars LEN COMPONENTS) \(quail-advice INPUT-STRING)" - (let* ((events (lambda (c) + (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)) - c))) + c)) + (string-to-list str))) (len (length str)) (idx len) composition from to)