From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 26 Jan 2002 23:02:00 +0000 (+0000)
Subject: (try_scrolling): Exchange uses of scroll_down_aggressively
X-Git-Tag: ttn-vms-21-2-B4~16955
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=46226c1d99cde0a85470cda6e7a72b299c3de2b8;p=emacs.git

(try_scrolling): Exchange uses of scroll_down_aggressively
and scroll_up_aggressively.
---

diff --git a/src/xdisp.c b/src/xdisp.c
index 19922bddc7a..d7ae5a4e6cc 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -9558,7 +9558,7 @@ try_scrolling (window, just_this_one_p, scroll_conservatively,
 	amount_to_scroll = scroll_max;
       else
 	{
-	  aggressive = current_buffer->scroll_down_aggressively;
+	  aggressive = current_buffer->scroll_up_aggressively;
 	  height = (WINDOW_DISPLAY_HEIGHT_NO_MODE_LINE (w)
 		    - WINDOW_DISPLAY_HEADER_LINE_HEIGHT (w));
 	  if (NUMBERP (aggressive))
@@ -9612,7 +9612,7 @@ try_scrolling (window, just_this_one_p, scroll_conservatively,
 	    amount_to_scroll = scroll_max;
 	  else
 	    {
-	      aggressive = current_buffer->scroll_up_aggressively;
+	      aggressive = current_buffer->scroll_down_aggressively;
 	      height = (WINDOW_DISPLAY_HEIGHT_NO_MODE_LINE (w)
 			- WINDOW_DISPLAY_HEADER_LINE_HEIGHT (w));
 	      if (NUMBERP (aggressive))