branch: externals/coterm
commit 586ce4effc9ae2d68f743d3b7d2b760e29297ffa
Author: m <>
Commit: m <>
Delete off-screen rows when scrolling up
---
coterm.el | 1 +
1 file changed, 1 insertion(+)
diff --git a/coterm.el b/coterm.el
index 7cbbaeb..e734035 100644
--- a/coterm.el
+++ b/coterm.el
@@ -166,6 +166,7 @@ insertion of empty lines."
((< 0 coterm--t-row)
(cl-decf coterm--t-row))
(t
+ (coterm--t-delete-region (1- coterm--t-scroll-end) 0)
(cl-decf coterm--t-home-offset)
(coterm--t-normalize-home-offset)))
(setq coterm--t-pmark-in-sync nil))
