summaryrefslogtreecommitdiff
path: root/src/wrapper.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/wrapper.hs')
-rw-r--r--src/wrapper.hs7
1 files changed, 4 insertions, 3 deletions
diff --git a/src/wrapper.hs b/src/wrapper.hs
index 1a90fcb0..c65d60d3 100644
--- a/src/wrapper.hs
+++ b/src/wrapper.hs
@@ -34,8 +34,9 @@ main = withConcurrentOutput $ go =<< getArgs
buildRunConfig :: [String] -> IO ()
buildRunConfig args = do
changeWorkingDirectory =<< dotPropellor
- buildPropellor Nothing
- putStrLn ""
- putStrLn ""
+ unlessM (doesFileExist "propellor") $ do
+ buildPropellor Nothing
+ putStrLn ""
+ putStrLn ""
(_, _, _, pid) <- createProcess (proc "./propellor" args)
exitWith =<< waitForProcess pid