Commit b2b2c677 authored by Jim Blandy's avatar Jim Blandy
Browse files

*** empty log message ***

parent c462c964
......@@ -80,11 +80,6 @@ extern int minibuf_prompt_width;
/* When the global-minibuffer-screen is not used, this is the screen
where the minbuffer is active, and thus where certain windows
(completions, etc.) should appear. */
struct screen *active_screen;
extern Lisp_Object Vglobal_minibuffer_screen;
......@@ -138,7 +133,14 @@ read_minibuf (map, initial, prompt, backup_n, expflag)
record_unwind_protect (Fset_window_configuration,
Fcurrent_window_configuration ());
Fcurrent_window_configuration (Qnil));
/* If the minibuffer window is on a different screen, save that
screen's configuration too. */
if (XSCREEN (WINDOW_SCREEN (XWINDOW (minibuf_window)))
!= selected_screen)
record_unwind_protect (Fset_window_configuration,
Fcurrent_window_configuration (WINDOW_SCREEN (XWINDOW (minibuf_window))));
val = current_buffer->directory;
Fset_buffer (get_minibuffer (minibuf_level));
......@@ -148,10 +150,6 @@ read_minibuf (map, initial, prompt, backup_n, expflag)
Vminibuf_scroll_window = selected_window;
Fset_window_buffer (minibuf_window, Fcurrent_buffer ());
if (SCREENP (Vglobal_minibuffer_screen))
active_screen = selected_screen;
Fselect_window (minibuf_window);
XFASTINT (XWINDOW (minibuf_window)->hscroll) = 0;
......@@ -202,11 +200,6 @@ read_minibuf (map, initial, prompt, backup_n, expflag)
if (expflag)
val = Fread (val);
if (active_screen)
active_screen = (struct screen *) 0;
return val;
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment