Make analyser into one machine

2022-03-22 09:35:17 +00:00
parent 9c46027711
commit c0383dbd8a
8 changed files with 95 additions and 11 deletions
@@ -149,7 +149,7 @@ quarterRoomTri w = do
            ]
        ,   [ blockLine (V2 (w/2) (w/2)) (V2 (negate $ w/2) (w/2))]
        ,   [ blockLine (V2 (w/2) (w/2)) (V2 0 (w/2))
-            , blockLine (V2 (-29) w) (V2 0 (w/2))
+            , blockLine (V2 (-29) w) (V2 0 (w/2)) & plType . putWall . wlRotateTo .~ False
            ]
        ]
    pure $ defaultRoom