(window_scroll_pixel_based): Don't recenter if

PT is partially visible in the window.

2 files changed, 7 insertions, 2 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 1718f06ee99..1f0ab6e89e6 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2001-08-15  Gerd Moellmann  <gerd@gnu.org>
 
+        * window.c (window_scroll_pixel_based): Don't recenter if
+        PT is partially visible in the window.
+
         * xterm.c (expose_window_tree, expose_window, expose_line): Return
         1 when overwriting mouse-face.
         (expose_frame): If mouse-face was overwritten, redo it.
diff --git a/src/window.c b/src/window.c
index abd2e6230ab..95caf878064 100644
--- a/src/window.c
+++ b/src/window.c
@@ -3960,8 +3960,10 @@ window_scroll_pixel_based (window, n, whole, noerror)
   SET_TEXT_POS_FROM_MARKER (start, w->start);
   
   /* If PT is not visible in WINDOW, move back one half of
-     the screen.  */
-  tem = Fpos_visible_in_window_p (make_number (PT), window, Qnil);
+     the screen.  Allow PT to be partially visible, otherwise
+     something like (scroll-down 1) with PT in the line before
+     the partially visible one would recenter. */
+  tem = Fpos_visible_in_window_p (make_number (PT), window, Qt);
   if (NILP (tem))
     {
       /* Move backward half the height of the window.  Performance note: