From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 11 Apr 1996 15:26:55 +0000 (+0000)
Subject: (redisplay_window): Move w->start marker before
X-Git-Tag: emacs-19.34~872
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4a0f786c4908e37175a1578d54e21d0c21f44b63;p=emacs.git

(redisplay_window): Move w->start marker before
running window-scroll-functions (in scroll_step case).
---

diff --git a/src/xdisp.c b/src/xdisp.c
index 744fb83c891..79821e4a350 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -1749,6 +1749,7 @@ redisplay_window (window, just_this_one, preserve_echo_area)
 	{
 	  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);