branch: elpa/scroll-on-drag
commit 86f335ff594aed225423d581bbe5690534c1dd12
Author: Campbell Barton <[email protected]>
Commit: Campbell Barton <[email protected]>
Cleanup: remove redundant decrement
---
scroll-on-drag.el | 1 -
1 file changed, 1 deletion(-)
diff --git a/scroll-on-drag.el b/scroll-on-drag.el
index 36815a7c38e..e8b0c13cbfa 100644
--- a/scroll-on-drag.el
+++ b/scroll-on-drag.el
@@ -358,7 +358,6 @@ Returns non-nil when scrolling took place, otherwise nil."
(lambda (self-fn)
(let ((lines delta))
(unless (zerop lines)
- (decf delta-px-accum (* lines this-frame-char-height))
(let ((lines-remainder (scroll-on-drag--scroll-by-lines
this-window lines t)))
(unless (zerop (- lines lines-remainder))
(scroll-on-drag--force-redisplay-with-hooks)))))
