From 6af641a04936624506f65086302d1389568bc8ab Mon Sep 17 00:00:00 2001
From: Andrzej Rybczak <electricityispower@gmail.com>
Date: Wed, 6 Oct 2010 21:48:29 +0200
Subject: [PATCH] fix for bd64052f: restore scrolling less than whole page in
 lists with mouse

---
 src/screen.h | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/src/screen.h b/src/screen.h
index 6668cdf3..3402a0d9 100644
--- a/src/screen.h
+++ b/src/screen.h
@@ -251,11 +251,19 @@ template <typename WindowType> void Screen<WindowType>::MouseButtonPressed(MEVEN
 {
 	if (me.bstate & BUTTON2_PRESSED)
 	{
-		Scroll(wPageDown);
+		if (Config.mouse_list_scroll_whole_page)
+			Scroll(wPageDown);
+		else
+			for (size_t i = 0; i < Config.lines_scrolled; ++i)
+				Scroll(wDown);
 	}
 	else if (me.bstate & BUTTON4_PRESSED)
 	{
-		Scroll(wPageUp);
+		if (Config.mouse_list_scroll_whole_page)
+			Scroll(wPageUp);
+		else
+			for (size_t i = 0; i < Config.lines_scrolled; ++i)
+				Scroll(wUp);
 	}
 }