aboutsummaryrefslogtreecommitdiff
path: root/Utility/CoProcess.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-06-14 17:59:22 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-06-14 17:59:22 -0400
commitaaae1dc2087cfe1b3f503e468bd6e8c626aa424c (patch)
tree94bc379907fbe5f4771201f47651fae0142255b1 /Utility/CoProcess.hs
parent7d41fb6b1844ccef6df8fc3175556b74f98097f8 (diff)
got file descriptors mixed up in last commit
Diffstat (limited to 'Utility/CoProcess.hs')
-rw-r--r--Utility/CoProcess.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/CoProcess.hs b/Utility/CoProcess.hs
index ec24c4dcc..700ef6eb1 100644
--- a/Utility/CoProcess.hs
+++ b/Utility/CoProcess.hs
@@ -43,7 +43,7 @@ start restartable cmd params env = do
start' :: CoProcessSpec -> IO CoProcessState
start' s = do
- (pid, to, from) <- startInteractiveProcess (coProcessCmd s) (coProcessParams s) (coProcessEnv s)
+ (pid, from, to) <- startInteractiveProcess (coProcessCmd s) (coProcessParams s) (coProcessEnv s)
return $ CoProcessState pid to from s
stop :: CoProcessHandle -> IO ()