Cleanup, split CWorld into separate file

2022-07-26 21:19:12 +01:00
parent c2707719fb
commit 6554d219dc
27 changed files with 1049 additions and 911 deletions
@@ -97,7 +97,7 @@ updateRenderSplit u = do

 playSoundUnlessRewinding :: Universe -> IO (M.Map SoundOrigin Sound)
 playSoundUnlessRewinding u
-    | _timeFlow (_cWorld w) == RewindingNow = return M.empty
+    | _timeFlow w == RewindingNow = return M.empty
    | otherwise = playSoundAndUpdate (_soundData $ _preloadData u) (_playingSounds w) (_toPlaySounds w)
  where
    w = _uvWorld u