aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJuan J. Martinez <jjm@usebox.net>2023-03-01 07:57:22 +0000
committerJuan J. Martinez <jjm@usebox.net>2023-03-01 07:57:22 +0000
commitac0ba74d4a1cbd9140cbe12a582a7ef4857d9b1f (patch)
tree9b526fe12a852fa0ba158054537a773410415fd6
parent20dda2b1cc32109d8ec6d6c127a96470873e81bc (diff)
downloadspace-plat-hs-ac0ba74d4a1cbd9140cbe12a582a7ef4857d9b1f.tar.gz
space-plat-hs-ac0ba74d4a1cbd9140cbe12a582a7ef4857d9b1f.zip
Added a FIXME
-rw-r--r--src/Game/Map.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Game/Map.hs b/src/Game/Map.hs
index f412410..5da8133 100644
--- a/src/Game/Map.hs
+++ b/src/Game/Map.hs
@@ -187,6 +187,7 @@ viewport renderer (Map mapData _) vx vy vw vh = do
newx = min (if fx + halfViewportWidth > mapWidth then mapWidth - vw else fx) (mapWidth - vw)
newy = min (if fy + halfViewportHeight > mapHeight then mapHeight - vh else fy) (mapHeight - vh)
+ -- FIXME: hardcoded size of the HUD; perhaps we need to pass x, y offsets to the viewport
mapRect = U.rect (-newx) (16 - newy) (newx + vw) vh
-- | Render a map.