diff --git a/src/Dodge/Room/RunPast.hs b/src/Dodge/Room/RunPast.hs index d3a787084..748bf2eca 100644 --- a/src/Dodge/Room/RunPast.hs +++ b/src/Dodge/Room/RunPast.hs @@ -1,5 +1,6 @@ module Dodge.Room.RunPast where import Dodge.UseAll +import Geometry.Polygon import Dodge.LevelGen.Data import Dodge.LightSource --import Dodge.RoomLink @@ -63,5 +64,6 @@ runPastRoom i = do ++ [return corridorWallN {_rmOutPmnt = [OutPlacement (putLitButOnPosExtTrig red useUnusedLnk) i] ,_rmPmnts = [] + ,_rmBound = [rectNSWE 70 30 0 40] } ]