Cleanup door placement/auto path generation

2025-10-24 20:51:38 +01:00
parent b0d519c69d
commit f94b914ceb
9 changed files with 83 additions and 155 deletions
@@ -52,8 +52,7 @@ data PSType
        , _putEndPoint :: Point2
        }
    | PutWall {_pwPoly :: [Point2], _pwWall :: Wall}
-    | PutSlideDr Bool Door Wall (S.Set EdgeObstacle) Float Point2 Point2
--    | PutDoor Color EdgeObstacle WdBl [(Point2, Point2)]
+    | PutSlideDr Bool Door Wall Float Point2 Point2
    | PutDoor Bool WdBl Float Point2A Point2A
    | RandPS (State StdGen PSType)
    | PutForeground ForegroundShape