Tweak level generation slightly

2021-11-28 20:58:38 +00:00
parent 98e44f0eee
commit 45ba120796
4 changed files with 27 additions and 36 deletions
@@ -165,10 +165,7 @@ startNewGame w = Just $ w
    i = fst $ random (_randGen (_uvWorld w))

 uvWorldSideEffects :: Int -> World -> b -> IO World
-uvWorldSideEffects i w = const (generateWorldFromSeed i <&> config .~ _config w
--        <&> preloadData .~ _preloadData w
-      )
-- this kills save games etc...
+uvWorldSideEffects i w = const (generateWorldFromSeed i <&> config .~ _config w)


 -- | hacky