@@ -78,8 +78,8 @@ initProject source = do
7878 , "."
7979 ]
8080 let configDir = "config"
81− createDirectory configDir
82− mapM_ (createDirectory . (configDir </>)) ["backend", "common", "frontend"]
81+ createDirectoryIfMissing False configDir
82+ mapM_ (createDirectoryIfMissing False . (configDir </>)) ["backend", "common", "frontend"]
8383
8484--TODO: Handle errors
8585--TODO: Allow the user to ignore our security concerns