summaryrefslogtreecommitdiff
path: root/src/System/Console
diff options
context:
space:
mode:
authorJoey Hess2016-03-06 16:38:40 -0400
committerJoey Hess2016-03-06 16:38:40 -0400
commit93ed7a22a8c5dd037929829f911c8235830e7ad5 (patch)
tree560658a2f692b565c8c244c71bb00206cb976266 /src/System/Console
parent96f041558db2d77edeb8dcfe56cdd8c5c224ba38 (diff)
propellor spin
Diffstat (limited to 'src/System/Console')
-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