Mercurial > emacs
changeset 52049:520603204d7c
(quail-translate-key): Fix previous change.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Sat, 26 Jul 2003 07:40:21 +0000 |
parents | eeb5d4fd97e1 |
children | dc09d3ca033d |
files | lisp/international/quail.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/quail.el Fri Jul 25 12:21:01 2003 +0000 +++ b/lisp/international/quail.el Sat Jul 26 07:40:21 2003 +0000 @@ -1694,7 +1694,8 @@ ;; 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)) + (if def (setq quail-current-str + (quail-get-current-str (1- len) def))) (1- len)))))) (defun quail-next-translation ()