changeset 51972:86e781de42e7

(quail-translate-key): Update quail-current-str correctly.
author Kenichi Handa <handa@m17n.org>
date Mon, 21 Jul 2003 07:16:40 +0000
parents f3e99fd01bcd
children a37ed2c7f8c0
files lisp/international/quail.el
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/quail.el	Mon Jul 21 06:25:33 2003 +0000
+++ b/lisp/international/quail.el	Mon Jul 21 07:16:40 2003 +0000
@@ -1692,6 +1692,9 @@
 
 	    (t
 	     ;; No way to handle the last character in this context.
+	     (setq def (quail-map-definition
+			(quail-lookup-key quail-current-key (1- len))))
+	     (setq quail-current-str (quail-get-current-str (1- len) def))
 	     (1- len))))))
 
 (defun quail-next-translation ()