Fix bug when forming convex hull of game room bounds

2021-09-30 23:46:59 +01:00
parent cb23960bd7
commit 1414d08d88
14 changed files with 51 additions and 16 deletions
@@ -76,6 +76,7 @@ shiftRoomBy shift r = r
        . (tileZero %~ shiftPointBy shift    )
        . (tileX    %~ shiftPointBy shift         )
        )
+    & rmViewpoints %~ map (shiftPointBy shift)

 shiftLinkBy 
    :: (Point2,Float)