summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>1997-08-22 01:22:49 +0000
committerKenichi Handa <handa@m17n.org>1997-08-22 01:22:49 +0000
commit802b3b3ea7d98b9c18635324fef31b055812822f (patch)
treea68f46ea4e26938c84cf468ab1512b9af9b777b2
parentbd1ef37c20415e0e9d287fa59caa8f6b4bc2e21c (diff)
downloademacs-802b3b3ea7d98b9c18635324fef31b055812822f.tar.gz
(quail-terminate-translation): Run
input-method-after-insert-chunk-hook only when the current input method doesn't require conversion. (quail-no-conversion): Run input-method-after-insert-chunk-hook.
-rw-r--r--lisp/international/quail.el13
1 files changed, 8 insertions, 5 deletions
diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index 05fe85bf0d6..d03974ecfa9 100644
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -974,10 +974,12 @@ in `input-method-after-insert-chunk-hook' (which see)."
(set-buffer quail-guidance-buf)
(erase-buffer)))
(setq overriding-terminal-local-map
- (if (and (overlayp quail-conv-overlay)
- (overlay-start quail-conv-overlay))
- (quail-conversion-keymap)))
- (run-hooks 'input-method-after-insert-chunk-hook))
+ (quail-conversion-keymap))
+ ;; Run this hook only when the current input method doesn't require
+ ;; conversion. When it requires, the conversoin function should run
+ ;; this hook at a proper timing.
+ (unless (quail-conversion-keymap)
+ (run-hooks 'input-method-after-insert-chunk-hook)))
(defun quail-select-current ()
"Select the current text shown in Quail translation region."
@@ -1281,7 +1283,8 @@ Remaining args are for FUNC."
"Do no conversion of the current conversion region of Quail."
(interactive)
(quail-delete-overlays)
- (setq overriding-terminal-local-map nil))
+ (setq overriding-terminal-local-map nil)
+ (run-hooks 'input-method-after-insert-chunk-hook))
;; Guidance, Completion, and Help buffer handlers.