1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 02:31:03 -08:00

(Fdelete_other_windows): Set w->force_start.

This commit is contained in:
Richard M. Stallman 1995-10-12 18:00:00 +00:00
parent e91b8e7ef7
commit 80622eecc9

View file

@ -1543,6 +1543,9 @@ value is reasonable when this function is called.")
w->start_at_line_beg = ((pos.bufpos == BEGV
|| FETCH_CHAR (pos.bufpos - 1) == '\n') ? Qt
: Qnil);
/* We need to do this, so that the window-scroll-functions
get called. */
w->force_start = Qt;
set_buffer_internal (obuf);
}
@ -2548,7 +2551,7 @@ window_scroll (window, n, noerror)
Lisp_Object bolp, nmoved;
/* Always set force_start so that redisplay_window will run
thw window-start-functions. */
thw window-scroll-functions. */
w->force_start = Qt;
XSETFASTINT (tem, PT);