use fmap for V2 division

swarm-game · Nov 19, 2023 · 3ae3661 · 3ae3661
1 parent 95b5731
commit 3ae3661
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Swarm/Game/World/Render.hs b/src/Swarm/Game/World/Render.hs
@@ -138,7 +138,7 @@ getDisplayGrid myScenario gs maybeSize =
   upperLeftLocation =
     if null maybeSize && not (isEmpty mapAreaDims)
       then ul firstScenarioWorld
-      else view planar vc .+^ V2 (negate $ w `div` 2) (h `div` 2)
+      else view planar vc .+^ ((`div` 2) <$> V2 (negate w) h)
 
   mkBoundingBox areaDimens upperLeftLoc =
     both W.locToCoords locationBounds