stop player from shining through walls

This commit is contained in:
nek0 2018-02-27 20:50:58 +01:00
parent 701a04060b
commit c742827e07

View file

@ -251,7 +251,7 @@ drawTile row col tile = do
rect ctx x (y - (74 - realToFrac tileHeight)) 64 74
fillPaint ctx paint
fill ctx
when (floor pr == row && floor pc == col) $ do
when (floor pr == row + 1 && floor pc == col + 1) $ do
beginPath ctx
circle ctx 640 360 5
closePath ctx