Make buttons have shape, expose multiple bugs

2021-09-27 12:28:53 +01:00
parent d9ad55ec50
commit 743c1c878d
19 changed files with 157 additions and 71 deletions
@@ -138,7 +138,7 @@ gameRoomsFromRooms = map f
  where
    f rm = GameRoom
        { _grViewpoints = (map fst . foldl' (flip cutWalls) [] $ _rmPolys rm)
-            ++ map fst (_rmLinks rm)
+        , _grViewpointsEx = map fst (_rmLinks rm)
        , _grBound = expandPolyByFixed 100 $ orderPolygon $ convexHullSafe $ concat $ _rmBound rm ++ _rmPolys rm
        , _grDir   = snd . last $ _rmLinks rm
        , _grName  = _rmName rm