summaryrefslogtreecommitdiff
path: root/jterm.hs
diff options
context:
space:
mode:
Diffstat (limited to 'jterm.hs')
-rw-r--r--jterm.hs2
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