fix unexpected eventlessness
This commit is contained in:
parent
2696dedbb4
commit
9b7b1c6167
1 changed files with 1 additions and 0 deletions
|
@ -120,6 +120,7 @@ withAffection AffectionConfig{..} = do
|
||||||
, deltaTime = dt
|
, deltaTime = dt
|
||||||
}
|
}
|
||||||
-- poll events
|
-- poll events
|
||||||
|
liftIO SDL.pumpEvents
|
||||||
evs <- preHandleEvents =<< liftIO SDL.pollEvents
|
evs <- preHandleEvents =<< liftIO SDL.pollEvents
|
||||||
-- handle events
|
-- handle events
|
||||||
handleEvents gameData evs
|
handleEvents gameData evs
|
||||||
|
|
Loading…
Reference in a new issue