Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
88d559ec
Commit
88d559ec
authored
Jul 10, 1997
by
Kenichi Handa
Browse files
(read-multilingual-string): Adjusted
for the previous change of variables related to input methods.
parent
0ef161c4
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
8 additions
and
5 deletions
+8
-5
lisp/international/mule-cmds.el
lisp/international/mule-cmds.el
+8
-5
No files found.
lisp/international/mule-cmds.el
View file @
88d559ec
...
...
@@ -495,11 +495,14 @@ If optional second arg INITIAL-INPUT is non-nil, insert it in the minibuffer
initially.
Optional
3rd
argument
INPUT-METHOD
specifies
the
input
method
to
be
activated
instead
of
the
one
selected
last
time.
"
(let ((default-input-method
(or input-method
default-input-method
(read-input-method-name "
Input
method:
" nil t))))
(let ((minibuffer-setup-hook '(toggle-input-method)))
(setq input-method
(or input-method
default-input-method
(read-input-method-name "
Input
method:
" nil t)))
(save-excursion
(set-buffer (window-buffer (minibuffer-window)))
(let ((default-input-method input-method)
(minibuffer-setup-hook '(toggle-input-method)))
(read-string prompt initial-input))))
;; Variables to control behavior of input methods. All input methods
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment