Commit 0e7a5039 authored by Kim F. Storm's avatar Kim F. Storm
Browse files

(line-move-partial): Call pos-visible-in-window-p with

position t instead of trying both window-end and window-end - 1.
parent 120b7781
...@@ -3496,11 +3496,9 @@ Outline mode sets this." ...@@ -3496,11 +3496,9 @@ Outline mode sets this."
(>= rbot (frame-char-height)) (>= rbot (frame-char-height))
(<= ypos (- (frame-char-height)))) (<= ypos (- (frame-char-height))))
(unless lh (unless lh
(let* ((wend (window-end nil t)) (let ((wend (pos-visible-in-window-p t nil t)))
(evis (or (pos-visible-in-window-p wend nil t) (setq rbot (nth 3 wend)
(pos-visible-in-window-p (1- wend) nil t)))) vpos (nth 5 wend))))
(setq rbot (nth 3 evis)
vpos (nth 5 evis))))
(cond (cond
;; If last line of window is fully visible, move forward. ;; If last line of window is fully visible, move forward.
((or (null rbot) (= rbot 0)) ((or (null rbot) (= rbot 0))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment