(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.

diff --git a/src/ChangeLog b/src/ChangeLog
index 5229e927211b9e1a138d0ea19e43160c1a047a31..929096d98eed6d2c956d293706e84af41c635371 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,9 @@
 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,
        resize that to exact size.
 

diff --git a/src/window.c b/src/window.c
index e507254f8c0c9d7a48f16fc5b22fc83b7b74f3a3..1b6ac07955d48dcc43c2a05d7ef319390c5ed3f0 100644 (file)
--- a/src/window.c
+++ b/src/window.c
@@ -2445,6 +2445,7 @@ size_window (window, size, width_p, nodelete_p)
       sideward = &w->hchild;
       forward = &w->vchild;
       w->height = make_number (size);
+      w->orig_height = Qnil;
     }
 
   if (!NILP (*sideward))
@@ -3803,6 +3804,8 @@ shrink_mini_window (w)
     }
   else if (XFASTINT (w->height) > 1)
     {
+      /* Distribute the additional lines of the mini-window
+        among the other windows.  */
       Lisp_Object window;
       XSETWINDOW (window, w);
       enlarge_window (window, 1 - XFASTINT (w->height), 0);