(line-move): Fix last change. Check partial

visibility at point rather than at window-start.

diff --git a/lisp/simple.el b/lisp/simple.el
index e2476577fe381541e51edeb55309f8c5e7b2d8b4..02ce351c50b75efcfc245d0832a001e7e30eee77 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -3183,7 +3183,7 @@ Outline mode sets this."
 (defun line-move (arg &optional noerror to-end)
   (if auto-window-vscroll
       (let ((forward (> arg 0))
-           (pvis (pos-visible-in-window-p (window-start) nil t)))
+           (pvis (pos-visible-in-window-p (point) nil t)))
        (if (and pvis (null (nth 2 pvis))
                 (> (nth (if forward 4 3) pvis) 0))
            (set-window-vscroll nil