fix pty cursor positioning after restripping buffer

1 files changed, 1 insertions, 1 deletions

diff --git a/jterm.hs b/jterm.hs
index 904dbfe..9382faf 100644
--- a/jterm.hs
+++ b/jterm.hs
@@ -351,7 +351,7 @@ handleEvent display win bgcolour fgcolour linecolour selcolour font event = do
                   delins end (R.length (content b)) ""
                 (4, 108) ->
                   -- ctrl-l (restrip buffer of ansi codes)
-                  delins 0 (R.length (content b)) (content b & R.toText & stripAnsiEscapeCodes & R.fromText)
+                  delins' True 0 (R.length (content b)) (content b & R.toText & stripAnsiEscapeCodes & R.fromText)
                 (4, 99) -> lift $ do
                   -- ctrl-c (copy)
                   storeBuffer display (R.toText selstr & T.unpack) 0