Skip to content
Snippets Groups Projects
Commit ee73be28 authored by stuebinm's avatar stuebinm
Browse files

fix a bug when writing things out

(it didn't check if directories to save maps in actually existed)
parent a318f848
No related branches found
No related tags found
No related merge requests found
...@@ -36,9 +36,9 @@ writeAdjustedRepository config inPath outPath result ...@@ -36,9 +36,9 @@ writeAdjustedRepository config inPath outPath result
createDirectoryIfMissing True outPath createDirectoryIfMissing True outPath
-- write out all maps -- write out all maps
mapM_ forM_ (toList $ dirresultMaps result) $ \(path,out) -> do
(\(path,out) -> encodeFile (outPath </> path) $ mapresultAdjusted out) createDirectoryIfMissing True (takeDirectory (outPath </> path))
(toList $ dirresultMaps result) encodeFile (outPath </> path) $ mapresultAdjusted out
unless (configDontCopyAssets config) $ do unless (configDontCopyAssets config) $ do
-- collect asset dependencies of maps -- collect asset dependencies of maps
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment