aboutsummaryrefslogtreecommitdiff
path: root/src/Game.hs
diff options
context:
space:
mode:
authorJuan J. Martinez <jjm@usebox.net>2023-03-01 08:00:43 +0000
committerJuan J. Martinez <jjm@usebox.net>2023-03-01 08:00:43 +0000
commit8d41ee397d3c159d3843b911e3dc6095700d3e5e (patch)
tree34b352f94d45087ed2d33ad1e9beee68444fcaa2 /src/Game.hs
parentac0ba74d4a1cbd9140cbe12a582a7ef4857d9b1f (diff)
downloadspace-plat-hs-8d41ee397d3c159d3843b911e3dc6095700d3e5e.tar.gz
space-plat-hs-8d41ee397d3c159d3843b911e3dc6095700d3e5e.zip
Pass an optional offset to the viewport
Diffstat (limited to 'src/Game.hs')
-rw-r--r--src/Game.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Game.hs b/src/Game.hs
index d1552d0..537b889 100644
--- a/src/Game.hs
+++ b/src/Game.hs
@@ -190,7 +190,7 @@ gameLoop = do
-- render map and entities
void $ do
-- set the SDL viewport
- viewport <- M.viewport renderer map' px py (fromIntegral gameWidth) (fromIntegral gameHeight - H.height)
+ viewport <- M.viewport renderer map' px py (fromIntegral gameWidth) (fromIntegral gameHeight - H.height) (Just (0, H.height))
M.render renderer map' viewport
E.renderVisible renderer updated viewport