diff options
author | Kenichi Handa <handa@m17n.org> | 1997-08-25 01:05:53 +0000 |
---|---|---|
committer | Kenichi Handa <handa@m17n.org> | 1997-08-25 01:05:53 +0000 |
commit | 038dcdca49be1127377903af2c2c0cc93f0bd0db (patch) | |
tree | 27b0cfefeeaa01878fbc49e613a8314dfce93914 /leim/quail/japanese.el | |
parent | 255d8b9706220fc192288b1d6b3925c4a40a17dc (diff) | |
download | emacs-038dcdca49be1127377903af2c2c0cc93f0bd0db.tar.gz |
(quail-japanese-kkc-mode-exit): Fix previous
change.
Diffstat (limited to 'leim/quail/japanese.el')
-rw-r--r-- | leim/quail/japanese.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/leim/quail/japanese.el b/leim/quail/japanese.el index d0c7b684040..13115b7cf98 100644 --- a/leim/quail/japanese.el +++ b/leim/quail/japanese.el @@ -79,9 +79,10 @@ ;; exited normally, else ARG is a cons (FROM . TO) where FROM and TO ;; specify a region not yet processed. (defun quail-japanese-kkc-mode-exit (arg) - (setq overriding-terminal-local-map (quail-conversion-keymap)) (if arg - (move-overlay quail-conv-overlay (car arg) (cdr arg)) + (progn + (setq overriding-terminal-local-map (quail-conversion-keymap)) + (move-overlay quail-conv-overlay (car arg) (cdr arg))) (run-hooks 'input-method-after-insert-chunk-hook))) (defun quail-japanese-self-insert-and-switch-to-alpha (key idx) |