[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/scroll-on-jump 2d024e6e61: Cleanup: format (update elisp-a
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/scroll-on-jump 2d024e6e61: Cleanup: format (update elisp-autofmt) |
Date: |
Mon, 9 Jan 2023 00:01:09 -0500 (EST) |
branch: elpa/scroll-on-jump
commit 2d024e6e61f08cb1224b58e71a8e40c9f9e7515f
Author: Campbell Barton <ideasman42@gmail.com>
Commit: Campbell Barton <ideasman42@gmail.com>
Cleanup: format (update elisp-autofmt)
---
scroll-on-jump.el | 16 +++++++---------
1 file changed, 7 insertions(+), 9 deletions(-)
diff --git a/scroll-on-jump.el b/scroll-on-jump.el
index e97b0b49c4..09a11b7933 100644
--- a/scroll-on-jump.el
+++ b/scroll-on-jump.el
@@ -380,8 +380,7 @@ Moving the point when ALSO-MOVE-POINT is set."
( ;; Note that we can't use `window-end' here as we may
;; be scrolled past the screen end-point.
(window-lines-prev
- (- height
- (count-screen-lines (window-start window) point-prev t
window)))
+ (- height (count-screen-lines (window-start window) point-prev
t window)))
(window-lines-next (+ window-lines-prev lines))
(lines-limit (max (/ height 2) window-lines-prev)))
(when (>= window-lines-next lines-limit)
@@ -461,13 +460,12 @@ Argument USE-WINDOW-START detects window scrolling when
non-nil."
(cond
- ( ;; Context changed or recursed, simply jump.
- (not
- (and
- ;; Buffer/Context changed.
- (eq buf (window-buffer window))
- (eq buf (current-buffer))
- (eq window (selected-window))))
+ ;; Context changed or recursed, simply jump.
+ ((not
+ ;; Check if the buffer/context changed.
+ (and (eq buf (window-buffer window))
+ (eq buf (current-buffer))
+ (eq window (selected-window))))
(goto-char point-next))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/scroll-on-jump 2d024e6e61: Cleanup: format (update elisp-autofmt),
ELPA Syncer <=