diff options
-rw-r--r-- | jterm.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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 |