# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 829236415 0
# Node ID c833cd83414cca2acb196255dd7552f08658f730
# Parent  5457cf99d7e191fc0a97484c79e6108b59be1791
(redisplay_window): Move w->start marker before
running window-scroll-functions (in scroll_step case).

diff -r 5457cf99d7e1 -r c833cd83414c src/xdisp.c
--- a/src/xdisp.c	Thu Apr 11 14:45:09 1996 +0000
+++ b/src/xdisp.c	Thu Apr 11 15:26:55 1996 +0000
@@ -1749,6 +1749,7 @@
 	{
 	  if (! NILP (Vwindow_scroll_functions))
 	    {
+	      Fset_marker (w->start, make_number (pos.bufpos), Qnil);
 	      run_hook_with_args_2 (Qwindow_scroll_functions, window,
 				    make_number (pos.bufpos));
 	      pos.bufpos = marker_position (w->start);