Mercurial > emacs
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) |