Commit 0130fe1a authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(size_window): Set the window's orig_top to nil when

changing heights, so that a future shrink_mini_window won't
restore a bogus height.
parent 940f14b4
2001-01-26 Gerd Moellmann <gerd@gnu.org> 2001-01-26 Gerd Moellmann <gerd@gnu.org>
* window.c (size_window): Set the window's orig_top to nil when
changing heights, so that a future shrink_mini_window won't
restore a bogus height.
* frame.c (do_switch_frame): If selected frame has a mini-window, * frame.c (do_switch_frame): If selected frame has a mini-window,
resize that to exact size. resize that to exact size.
......
...@@ -2445,6 +2445,7 @@ size_window (window, size, width_p, nodelete_p) ...@@ -2445,6 +2445,7 @@ size_window (window, size, width_p, nodelete_p)
sideward = &w->hchild; sideward = &w->hchild;
forward = &w->vchild; forward = &w->vchild;
w->height = make_number (size); w->height = make_number (size);
w->orig_height = Qnil;
} }
if (!NILP (*sideward)) if (!NILP (*sideward))
...@@ -3803,6 +3804,8 @@ shrink_mini_window (w) ...@@ -3803,6 +3804,8 @@ shrink_mini_window (w)
} }
else if (XFASTINT (w->height) > 1) else if (XFASTINT (w->height) > 1)
{ {
/* Distribute the additional lines of the mini-window
among the other windows. */
Lisp_Object window; Lisp_Object window;
XSETWINDOW (window, w); XSETWINDOW (window, w);
enlarge_window (window, 1 - XFASTINT (w->height), 0); enlarge_window (window, 1 - XFASTINT (w->height), 0);
......
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