Fix precision scrolling down for multi-line display strings

* lisp/pixel-scroll.el
(pixel-scroll-precision-scroll-down-page): Make sure Y delta
is appropriate before deciding on next-pos.

1 files changed, 5 insertions, 0 deletions

diff --git a/lisp/pixel-scroll.el b/lisp/pixel-scroll.el
index 223bc7fbc47..975c5133f11 100644
--- a/lisp/pixel-scroll.el
+++ b/lisp/pixel-scroll.el
@@ -461,6 +461,11 @@ the height of the current window."
                      (when (zerop (vertical-motion (1+ scroll-margin)))
                        (set-window-start nil desired-start)
                        (signal 'end-of-buffer nil))
+                     (while (when-let ((posn (posn-at-point)))
+                              (< (cdr (posn-x-y posn)) delta))
+                       (when (zerop (vertical-motion 1))
+                         (set-window-start nil desired-start)
+                         (signal 'end-of-buffer nil)))
                      (point)))
          (scroll-preserve-screen-position nil)
          (auto-window-vscroll nil))