Rearrange zone sizes

2022-06-28 09:38:24 +01:00
parent 480fc2df5e
commit e8849eb8d5
8 changed files with 23 additions and 20 deletions
@@ -25,7 +25,7 @@ wallsToDraw w
        <$> L.prefilter wlOpaqueDraw (L.premap f L.list)
        <*> L.prefilter wlSeeThroughDraw (L.premap f L.list)
        <*> L.premap getWallSPic L.mconcat
-        ) (S.concat $ S.mapMaybe g $ zoneOfSight wallZoneSize w)
+        ) (S.concat $ S.mapMaybe g $ zoneOfSight wlZoneSize w)
    g (V2 i j) = w ^? wallsZone . znObjects . ix i . ix j
    
 wlOpaqueDraw :: Wall -> Bool