diff options
| author | Kenichi Handa | 1997-09-01 10:46:54 +0000 |
|---|---|---|
| committer | Kenichi Handa | 1997-09-01 10:46:54 +0000 |
| commit | 3df608415e6b46b2cb881dbff3b11a28a5acc57d (patch) | |
| tree | 1b755c2acfcc531197c811a58ed102f76dda726d | |
| parent | 787549348d7964565a262544d98d84a5a7733ab2 (diff) | |
| download | emacs-3df608415e6b46b2cb881dbff3b11a28a5acc57d.tar.gz emacs-3df608415e6b46b2cb881dbff3b11a28a5acc57d.zip | |
(read-multilingual-string): Fix previous change.
| -rw-r--r-- | lisp/international/mule-cmds.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 376e9726e4b..6d0c4fd430e 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el | |||
| @@ -565,7 +565,7 @@ or a string." | |||
| 565 | (or input-method | 565 | (or input-method |
| 566 | default-input-method | 566 | default-input-method |
| 567 | (read-input-method-name "Input method: " nil t))) | 567 | (read-input-method-name "Input method: " nil t))) |
| 568 | (if (and input-method (symbolp input-method) | 568 | (if (and input-method (symbolp input-method)) |
| 569 | (setq input-method (symbol-name input-method))) | 569 | (setq input-method (symbol-name input-method))) |
| 570 | (let ((current-input-method input-method)) | 570 | (let ((current-input-method input-method)) |
| 571 | (read-string prompt initial-input nil nil t))) | 571 | (read-string prompt initial-input nil nil t))) |