justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Stop camera movement when pausing

Browse Source
This commit is contained in:
justin
2025-06-02 12:55:27 +01:00
parent 1851dcc5d6
commit 695cf3c5fd
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/Update.hs
+2 -2
View File
@@ -75,7 +75,6 @@ updateUniverse u =
. updateUniverseMid . updateUniverseMid
. debugEvents . debugEvents
. updateMouseContext cfig . updateMouseContext cfig
. over uvWorld (updateCamera cfig)
. updateUniverseFirst . updateUniverseFirst
$ u $ u
where where
@@ -161,10 +160,11 @@ updateUniverseMid u = case _uvScreenLayers u of
(sl : _) -> u & uvWorld . unpauseClock .~ 0 & updateUseInputOnScreen sl (sl : _) -> u & uvWorld . unpauseClock .~ 0 & updateUseInputOnScreen sl
[] -> [] ->
(uvWorld . unpauseClock +~ 1) . (uvWorld . unpauseClock +~ 1) .
timeFlowUpdate . updateUseInputInGame $ timeFlowUpdate . updateUseInputInGame .
over over
uvWorld uvWorld
(updateMouseInGame (u ^. uvConfig)) (updateMouseInGame (u ^. uvConfig))
$ over uvWorld (updateCamera (u ^. uvConfig))
u u
timeFlowUpdate :: Universe -> Universe timeFlowUpdate :: Universe -> Universe