# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 813520800 0
# Node ID 43d90596da34fdc365cc1fda1896204585d9bc43
# Parent  69ab0ac9501a466066087debc7a311035aacc6dd
(Fdelete_other_windows): Set w->force_start.

diff -r 69ab0ac9501a -r 43d90596da34 src/window.c
--- a/src/window.c	Thu Oct 12 17:56:17 1995 +0000
+++ b/src/window.c	Thu Oct 12 18:00:00 1995 +0000
@@ -1543,6 +1543,9 @@
       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 @@
   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);