diff options
| author | Joey Hess <joeyh@joeyh.name> | 2016-04-02 01:59:38 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-04-02 01:59:38 -0400 |
| commit | db2d46246c5772c12aa8cf64ea604b65d164a7b0 (patch) | |
| tree | 064f1656df79aff65e0918bf98eab645fb274d8d /src | |
| parent | 828830eace62dba7d75b656142d83f8396fd2968 (diff) | |
make sure that the wrapper runs propellor in the foreground
Diffstat (limited to 'src')
| -rw-r--r-- | src/wrapper.hs | 5 |
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 |