# HG changeset patch # User Kenichi Handa # Date 872212969 0 # Node ID e6134c179b4c966dfd39054eea532107d099caa0 # Parent 9cf9cae3759827f8032bf03e96e938bc7a4f25c0 (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. diff -r 9cf9cae37598 -r e6134c179b4c lisp/international/quail.el --- a/lisp/international/quail.el Fri Aug 22 01:22:17 1997 +0000 +++ b/lisp/international/quail.el Fri Aug 22 01:22:49 1997 +0000 @@ -974,10 +974,12 @@ (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 @@ "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.