Revision: miles@gnu.org--gnu-2004/emacs--unicode--0--patch-72
[bpt/emacs.git] / src / window.c
index 7362aa5..3f8fa51 100644 (file)
@@ -3460,7 +3460,7 @@ displayed.  */)
        window = Fsplit_window (window, Qnil, Qnil);
       else
        {
-         Lisp_Object upper, lower, other;
+         Lisp_Object upper, other;
 
          window = Fget_lru_window (frames);
          /* If the LRU window is selected, and big enough,
@@ -3493,11 +3493,11 @@ displayed.  */)
            window = Fframe_selected_window (call0 (Vpop_up_frame_function));
          /* If window appears above or below another,
             even out their heights.  */
-         other = upper = lower = Qnil;
+         other = upper = Qnil;
          if (!NILP (XWINDOW (window)->prev))
-           other = upper = XWINDOW (window)->prev, lower = window;
+           other = upper = XWINDOW (window)->prev;
          if (!NILP (XWINDOW (window)->next))
-           other = lower = XWINDOW (window)->next, upper = window;
+           other = XWINDOW (window)->next, upper = window;
          if (!NILP (other)
              && !NILP (Veven_window_heights)
              /* Check that OTHER and WINDOW are vertically arrayed.  */