mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-01 01:41:01 -08:00
Code Issues Projects Releases Wiki Activity

(read-multilingual-string): Don't

Browse source 
activate an input method in the current buffer, but just bind
current-input-method.
This commit is contained in:
Kenichi Handa 1998-07-19 05:17:35 +00:00
parent b45d8d64b6
commit 6c0bf615bb
1 changed files with 2 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lisp/international/mule-cmds.el
View file

@ -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.