mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

(read_minibuf): Set the multibyteness of the

Browse Source 
minibuffer before inserting `initial' string.
This commit is contained in:
Richard M. Stallman 1999-07-02 12:15:14 +00:00
parent 716490f0c2
commit 094d978996
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/minibuf.c
View File

@ -370,6 +370,10 @@ read_minibuf (map, initial, prompt, backup_n, expflag,
unbind_to (count1, Qnil);
}
/* If appropriate, copy enable-multibyte-characters into the minibuffer. */
if (inherit_input_method)
current_buffer->enable_multibyte_characters = enable_multibyte;
/* Put in the initial input. */
if (!NILP (initial))
{
@ -388,10 +392,6 @@ read_minibuf (map, initial, prompt, backup_n, expflag,
if (STRINGP (input_method) && !NILP (Ffboundp (Qactivate_input_method)))
call1 (Qactivate_input_method, input_method);
/* If appropriate, copy enable-multibyte-characters into the minibuffer. */
if (inherit_input_method)
current_buffer->enable_multibyte_characters = enable_multibyte;
if (!NILP (current_buffer->enable_multibyte_characters)
&& ! STRING_MULTIBYTE (minibuf_prompt))
minibuf_prompt = Fstring_make_multibyte (minibuf_prompt);