From: Václav Slavík <vslavik@fastmail.fm>
Date: Mon, 17 Jan 2000 22:11:53 +0000 (+0000)
Subject: PageUp/PageDown scroll by 2/3 of client area height (was 1)
X-Git-Url: https://git.saurik.com/wxWidgets.git/commitdiff_plain/6aef9caf82c3afbf4f42f16fd470b80c2b95e0db

PageUp/PageDown scroll by 2/3 of client area height (was 1)


git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@5486 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
---

diff --git a/src/html/htmlwin.cpp b/src/html/htmlwin.cpp
index cdd00d18c2..af8f4639f9 100644
--- a/src/html/htmlwin.cpp
+++ b/src/html/htmlwin.cpp
@@ -470,12 +470,12 @@ void wxHtmlWindow::OnKeyDown(wxKeyEvent& event)
 
     switch (event.KeyCode()) {
         case WXK_PAGEUP :
-    case WXK_PRIOR :
-                Scroll(-1, sty - cliy);
+        case WXK_PRIOR :
+                Scroll(-1, sty - (2 * cliy / 3));
                 break;
         case WXK_PAGEDOWN :
-    case WXK_NEXT :
-                Scroll(-1, sty + cliy);
+        case WXK_NEXT :
+                Scroll(-1, sty + (2 * cliy / 3));
                 break;
         case WXK_HOME :
                 Scroll(-1, 0);