From: Markus Rinne <markus.ka.rinne@gmail.com>
Date: Mon, 25 Nov 2024 11:31:56 +0000 (+0200)
Subject: Clear screen: Fix edge case
X-Git-Url: http://www.git.stargrave.org/?a=commitdiff_plain;h=6009e6e25bdff9548f085e9ae562b1ca305d3a0b;p=st.git

Clear screen: Fix edge case

With sequence \e[1J, if cursor is on second line, clear the first line.
---

diff --git a/st.c b/st.c
index 57c6e96..2e3800e 100644
--- a/st.c
+++ b/st.c
@@ -1705,7 +1705,7 @@ csihandle(void)
 			}
 			break;
 		case 1: /* above */
-			if (term.c.y > 1)
+			if (term.c.y > 0)
 				tclearregion(0, 0, term.col-1, term.c.y-1);
 			tclearregion(0, term.c.y, term.c.x, term.c.y);
 			break;