branch: elpa/eat
commit dfa7e025578c1284d2ace7dffa8153c1fd0c9051
Author: Akib Azmain Turja <[email protected]>
Commit: Akib Azmain Turja <[email protected]>
Fix typo in 'eat--t-scroll-up'
* eat.el (eat--t-scroll-up): Replace 'scroll-begin' with
'scroll-end' in '(< scroll-end (eat--t-disp-width disp))',
since this will always evaluate to t, and thus it was most
probably a typo.
---
eat.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/eat.el b/eat.el
index 6a23ee720f..f8601dbabb 100644
--- a/eat.el
+++ b/eat.el
@@ -1100,7 +1100,8 @@ accordingly."
(insert ?\n))
(set-marker (eat--t-disp-begin disp) (point)))
;; Is the last line on display in scroll region?
- (when (< scroll-begin (eat--t-disp-width disp))
+ (when (< scroll-end (eat--t-disp-width disp))
+ ;; No, it isn't.
;; Go to the end of scroll region (before deleting or moving
;; texts).
(eat--t-goto-bol (- (1+ (- scroll-end scroll-begin)) n))
