]> git.eshelyaron.com Git - emacs.git/commitdiff
(line-move-partial): Call pos-visible-in-window-p with
authorKim F. Storm <storm@cua.dk>
Wed, 20 Sep 2006 09:45:19 +0000 (09:45 +0000)
committerKim F. Storm <storm@cua.dk>
Wed, 20 Sep 2006 09:45:19 +0000 (09:45 +0000)
position t instead of trying both window-end and window-end - 1.

lisp/simple.el

index 8f954c281a134088e39cce05b13e3e9da9e569f1..1d1e34c77e32a0e8cef2252cbd1a0e4df997574b 100644 (file)
@@ -3496,11 +3496,9 @@ Outline mode sets this."
                (>= rbot (frame-char-height))
                (<= ypos (- (frame-char-height))))
        (unless lh
-         (let* ((wend (window-end nil t))
-                (evis (or (pos-visible-in-window-p wend nil t)
-                          (pos-visible-in-window-p (1- wend) nil t))))
-           (setq rbot (nth 3 evis)
-                 vpos (nth 5 evis))))
+         (let ((wend (pos-visible-in-window-p t nil t)))
+           (setq rbot (nth 3 wend)
+                 vpos (nth 5 wend))))
        (cond
         ;; If last line of window is fully visible, move forward.
         ((or (null rbot) (= rbot 0))