]> code.delx.au - gnu-emacs/blobdiff - src/window.c
Merge from emacs--devo--0
[gnu-emacs] / src / window.c
index 0395f8f300dca0fdc0dc9aececa6b8bda731eb32..a377ff76718da41456b9e97e139f9a9d02f4fdf7 100644 (file)
@@ -3792,7 +3792,7 @@ displayed.  */)
        window = call1 (Vsplit_window_preferred_function, window);
       else
        {
-         Lisp_Object upper, lower, other;
+         Lisp_Object upper, other;
 
          window = Fget_lru_window (frames, Qt);
          /* If the LRU window is tall enough, and either eligible for
@@ -3831,11 +3831,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.  */