[Emacs-diffs] Changes to emacs/lisp/simple.el,v

[Kim F. Storm]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Kim F. Storm <kfstorm>  06/09/20 09:45:19

Index: simple.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/simple.el,v
retrieving revision 1.825
retrieving revision 1.826
diff -u -b -r1.825 -r1.826
--- simple.el   19 Sep 2006 21:34:01 -0000      1.825
+++ simple.el   20 Sep 2006 09:45:19 -0000      1.826
@@ -3496,11 +3496,9 @@
                (>= 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))