From 6c0bf615bbcdd3ef1a55d06fc7cf328886ecf32c Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Sun, 19 Jul 1998 05:17:35 +0000 Subject: [PATCH] (read-multilingual-string): Don't activate an input method in the current buffer, but just bind current-input-method. --- lisp/international/mule-cmds.el | 10 ++-------- 1 file changed, 2 insertions(+), 8 deletions(-) diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index c06f9e35c54..5352fb02f24 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -764,14 +764,8 @@ or a string." (read-input-method-name "Input method: " nil t))) (if (and input-method (symbolp input-method)) (setq input-method (symbol-name input-method))) - (let ((previous-input-method current-input-method)) - (unwind-protect - (progn - (activate-input-method input-method) - (read-string prompt initial-input nil nil t)) - (if previous-input-method - (activate-input-method previous-input-method) - (inactivate-input-method))))) + (let ((current-input-method input-method)) + (read-string prompt initial-input nil nil t))) ;; Variables to control behavior of input methods. All input methods ;; should react to these variables. -- 2.39.2