summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/System/Console/Concurrent/Internal.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/System/Console/Concurrent/Internal.hs b/src/System/Console/Concurrent/Internal.hs
index 5b9cf454..a2554cb6 100644
--- a/src/System/Console/Concurrent/Internal.hs
+++ b/src/System/Console/Concurrent/Internal.hs
@@ -452,7 +452,7 @@ bufferWriter ts = do
bufferOutputSTM' outh b
-- worker1 might be blocked waiting for the output
-- lock, and we've already done its job, so cancel it
- cancel worker1
+ -- cancel worker1
-- Adds a value to the OutputBuffer. When adding Output to a Handle,
-- it's cheaper to combine it with any already buffered Output to that