1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-08 15:35:02 +00:00

(read-multilingual-string): Fix previous change.

This commit is contained in:
Kenichi Handa 1997-09-01 10:46:54 +00:00
parent 787549348d
commit 3df608415e

View File

@ -565,7 +565,7 @@ or a string."
(or input-method
default-input-method
(read-input-method-name "Input method: " nil t)))
(if (and input-method (symbolp input-method)
(if (and input-method (symbolp input-method))
(setq input-method (symbol-name input-method)))
(let ((current-input-method input-method))
(read-string prompt initial-input nil nil t)))