unset wrapping flag when goto happens

2023-02-19 20:41:48 -05:00 · 2023-02-19 20:41:48 -05:00 · caf1e4dc02
parent 6b733da6d1
commit caf1e4dc02
1 changed files with 1 additions and 0 deletions
--- a/term.tal
+++ b/term.tal
@ -1025,6 +1025,7 @@
    .cur-wrap LDZ ?&skip clear-cursor down-or-scroll &skip JMP2r

@goto ( y* x* -> )
+    #00 .cur-wrap STZ
    clear-cursor
    .max-x LDZ2 min .cur-x STZ2
    .max-y LDZ2 min .cur-y STZ2