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 57c6e962ac778da43795ed855035b4554ebd02cf..2e3800e437ecda60d015a16da9f468c576337bb4 100644 (file)
--- 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;