Move saves to generated folder
This commit is contained in:
@@ -39,7 +39,7 @@ doDebugTest2 = uvDebugFloat1 .~ 20
|
||||
|
||||
doDebugTestF6 :: Universe -> Universe
|
||||
doDebugTestF6 = uvIOEffects %~ \f u -> do
|
||||
Just ss <- decodeFileStrict "saveSlot/QuickSave"
|
||||
Just ss <- decodeFileStrict "generated/saves/QuickSave"
|
||||
writeFile "log/prettyQuickSave" ""
|
||||
mapM_ (\s -> appendFile "log/prettyQuickSave" (s ++ "\n")) $ prettyShort (ss :: CWorld)
|
||||
putStrLn "log/prettyQuickSave written"
|
||||
|
||||
Reference in New Issue
Block a user