mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

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

Browse source 
position t instead of trying both window-end and window-end - 1.
This commit is contained in:
Kim F. Storm 2006-09-20 09:45:19 +00:00
parent 120b778160
commit 0e7a5039b9
1 changed files with 3 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/simple.el
View 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))