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))

Reply via email to