emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 902f343c: Set start to desired start when pixel scrolling to end


From: Po Lu
Subject: master 902f343c: Set start to desired start when pixel scrolling to end of buffer
Date: Thu, 23 Dec 2021 06:01:52 -0500 (EST)

branch: master
commit 902f343c18e1894cd5a0e702151fa457651fe0b1
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>

    Set start to desired start when pixel scrolling to end of buffer
    
    * lisp/pixel-scroll.el
    (pixel-scroll-precision-scroll-down-page): Set start to desired
    start when point cannot be moved further down.
---
 lisp/pixel-scroll.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/pixel-scroll.el b/lisp/pixel-scroll.el
index 4aae166..223bc7f 100644
--- a/lisp/pixel-scroll.el
+++ b/lisp/pixel-scroll.el
@@ -459,6 +459,7 @@ the height of the current window."
          (next-pos (save-excursion
                      (goto-char desired-start)
                      (when (zerop (vertical-motion (1+ scroll-margin)))
+                       (set-window-start nil desired-start)
                        (signal 'end-of-buffer nil))
                      (point)))
          (scroll-preserve-screen-position nil)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]