Mercurial > emacs

changeset 59698:815c3e98edef

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(line-move): Fix last change. Check partial visibility at point rather than at window-start.
author Kim F. Storm <storm@cua.dk>
date Sun, 23 Jan 2005 00:53:32 +0000
parents 3c5cc02ff90e
children 6491ad700699
files lisp/simple.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Sun Jan 23 00:53:10 2005 +0000
+++ b/lisp/simple.el	Sun Jan 23 00:53:32 2005 +0000
@@ -3183,7 +3183,7 @@
 (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