]> code.delx.au - gnu-emacs/blobdiff - src/window.c
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-57
[gnu-emacs] / src / window.c
index 72fbc58e32ac6a138034c0243ddf2176341e2594..1bd8c3924a104055ccd2198a90a0bd3b3e879ae7 100644 (file)
@@ -3566,7 +3566,7 @@ displayed.  */)
        window = Fsplit_window (window, Qnil, Qnil);
       else
        {
-         Lisp_Object upper, lower, other;
+         Lisp_Object upper, other;
 
          window = Fget_lru_window (frames, Qt);
          /* If the LRU window is selected, and big enough,
@@ -3603,11 +3603,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.  */