Work on what happens when creatures fall down chasms
This commit is contained in:
+1
-1
@@ -33,7 +33,7 @@ import Shader.Poke.Cloud
|
||||
|
||||
doDrawing :: SDL.Window -> Universe -> IO ()
|
||||
doDrawing window u
|
||||
| SDL.ScancodeT `M.member` (u ^. uvWorld . input . pressedKeys) = doTestDrawing rdata u
|
||||
| SDL.ScancodeY `M.member` (u ^. uvWorld . input . pressedKeys) = doTestDrawing rdata u
|
||||
| otherwise = doDrawing' window rdata u
|
||||
where
|
||||
rdata = u ^. preloadData . renderData
|
||||
|
||||
Reference in New Issue
Block a user