summaryrefslogtreecommitdiff
path: root/src/wrapper.hs
diff options
context:
space:
mode:
authorJoey Hess2016-04-02 01:59:38 -0400
committerJoey Hess2016-04-02 01:59:38 -0400
commitdb2d46246c5772c12aa8cf64ea604b65d164a7b0 (patch)
tree064f1656df79aff65e0918bf98eab645fb274d8d /src/wrapper.hs
parent828830eace62dba7d75b656142d83f8396fd2968 (diff)
make sure that the wrapper runs propellor in the foreground
Diffstat (limited to 'src/wrapper.hs')
-rw-r--r--src/wrapper.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/wrapper.hs b/src/wrapper.hs
index 212f737d..90f14379 100644
--- a/src/wrapper.hs
+++ b/src/wrapper.hs
@@ -14,6 +14,7 @@ import Propellor.Message
import Propellor.Bootstrap
import Utility.Monad
import Utility.Process
+import Utility.Process.NonConcurrent
import System.Directory
import System.Environment (getArgs)
@@ -39,5 +40,5 @@ buildRunConfig args = do
buildPropellor Nothing
putStrLn ""
putStrLn ""
- (_, _, _, pid) <- createProcess (proc "./propellor" args)
- exitWith =<< waitForProcess pid
+ (_, _, _, pid) <- createProcessNonConcurrent (proc "./propellor" args)
+ exitWith =<< waitForProcessNonConcurrent pid