summaryrefslogtreecommitdiff
path: root/src/System/Console/Concurrent
diff options
context:
space:
mode:
authorJoey Hess2016-03-06 15:16:27 -0400
committerJoey Hess2016-03-06 15:16:27 -0400
commita06da5b738efd95c6772b5e4a1b510f1de2d7912 (patch)
tree8d0549775fc8f33e830184f06556aec142f94eaf /src/System/Console/Concurrent
parentdaaf67021cd468fecefbeb0dbfe6244ca34b3a6d (diff)
propellor spin
Diffstat (limited to 'src/System/Console/Concurrent')
-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 b3ae588c..f38c63c3 100644
--- a/src/System/Console/Concurrent/Internal.hs
+++ b/src/System/Console/Concurrent/Internal.hs
@@ -290,8 +290,8 @@ fgProcess p = do
-- Wait for the process to exit and drop the lock.
asyncProcessWaiter $ do
void $ tryIO $ P.waitForProcess h
- dropOutputLock
print ("fgProcess done", showProc p)
+ dropOutputLock
return (toConcurrentProcessHandle r)
#ifndef mingw32_HOST_OS