[nongnu] elpa/scroll-on-jump 1f2349edf4 04/31: Fix scrolling down when the point is at the beginning of the buffer

[ELPA Syncer]

branch: elpa/scroll-on-jump
commit 1f2349edf42a1feea5d8c7f96d7bd4fd56e1c767
Author: Campbell Barton <ideasman42@gmail.com>
Commit: Campbell Barton <ideasman42@gmail.com>

    Fix scrolling down when the point is at the beginning of the buffer
---
 scroll-on-jump.el | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/scroll-on-jump.el b/scroll-on-jump.el
index 8c38c2ad2d..7be5edf77e 100644
--- a/scroll-on-jump.el
+++ b/scroll-on-jump.el
@@ -250,6 +250,14 @@ Argument ALSO-MOVE-POINT When non-nil, move the POINT as 
well."
           (px-done-abs 0)
           (px-scroll-abs (abs (* lines-scroll char-height)))
           (px-scroll (* lines-scroll char-height)))
+
+        ;; Workaround for situations when the `point' starts at the window 
bounds.
+        ;; If this happens we can't do any sub-pixel scrolling as the `point' 
locks scrolling.
+        ;; This is only needed for pixel level scrolling.
+        ;;
+        ;; We can move arbitrary lines here since the final point is set at 
the very end.
+        (forward-line dir)
+
         (while-no-input
           (while (< px-done-abs px-scroll-abs)
             ;; Inhibit quit in all of this logic except re-display.