comparison lisp/international/quail.el @ 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 ad343b711d5e
children 520603204d7c
comparison
equal deleted inserted replaced
51971:f3e99fd01bcd 51972:86e781de42e7
1690 ;; And, we can terminate the current translation. 1690 ;; And, we can terminate the current translation.
1691 t) 1691 t)
1692 1692
1693 (t 1693 (t
1694 ;; No way to handle the last character in this context. 1694 ;; No way to handle the last character in this context.
1695 (setq def (quail-map-definition
1696 (quail-lookup-key quail-current-key (1- len))))
1697 (setq quail-current-str (quail-get-current-str (1- len) def))
1695 (1- len)))))) 1698 (1- len))))))
1696 1699
1697 (defun quail-next-translation () 1700 (defun quail-next-translation ()
1698 "Select next translation in the current batch of candidates." 1701 "Select next translation in the current batch of candidates."
1699 (interactive) 1702 (interactive)