summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoey Hess2015-10-28 15:16:44 -0400
committerJoey Hess2015-10-28 15:16:44 -0400
commit46e113e200af741695417ce38ae8cb6fd670a486 (patch)
tree086e99ce1704b9ae5b44a429fcbf3d45f26edfae
parent76a84010180d17d99982880c6b1e7ae4bed82a76 (diff)
propellor spin
-rw-r--r--src/Utility/ConcurrentOutput.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Utility/ConcurrentOutput.hs b/src/Utility/ConcurrentOutput.hs
index 3ced5083..3c072cf4 100644
--- a/src/Utility/ConcurrentOutput.hs
+++ b/src/Utility/ConcurrentOutput.hs
@@ -85,7 +85,7 @@ takeOutputLock' block = go =<< withLock tryTakeTMVar
( havelock
, if block
then do
- void $ tryIO $ P.waitForProcess h
+ void $ P.waitForProcess h
havelock
else do
withLock (`putTMVar` orig)