nek0/tracer
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

typo

Browse source
This commit is contained in:
nek0 2018-09-22 01:18:24 +02:00
parent 500cf17123
commit 48b8aaf379
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/Main.hs
View file

@ -72,9 +72,9 @@ quitGame (MsgKeyboardEvent _ _ SDL.Pressed False sym)
ad <- A.get
ud <- getAffection
let Subsystems w m k = subsystems ud
mapM_ (partUnsubscribe w) (uuid ud)
mapM_ (partUnsubscribe m) (uuid ud)
mapM_ (partUnsubscribe k) (uuid ud)
mapM_ (partUnSubscribe w) (uuid ud)
mapM_ (partUnSubscribe m) (uuid ud)
mapM_ (partUnSubscribe k) (uuid ud)
SDL.glMakeCurrent (drawWindow ad) (glContext ad)
(ws, _) <- yieldSystemT (0, defStorage) (return ())
putAffection ud