@@ -13,7 +13,7 @@ main :: IO ()
14 top <- getCurrentDirectory
14 top <- getCurrentDirectory
15 let ioScript s = top</>"IO"</>s
15 let ioScript s = top</>"IO"</>s
16− runCmd "git submodule init"
16+ runCmd "git submodule update --init"
17 out <- readProcess "npm" ["ls", "--parseable"] ""
17 out <- readProcess "npm" ["ls", "--parseable"] ""
18 unless ("jsdom" `isInfixOf` out) $ runCmd "npm install jsdom"
18 unless ("jsdom" `isInfixOf` out) $ runCmd "npm install jsdom"
19 setCurrentDirectory $ top</>"tests"</>"elm"
19 setCurrentDirectory $ top</>"tests"</>"elm"