justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Fix small bug allowing for overlapping rooms

Browse Source
This commit is contained in:
justin
2022-06-12 18:26:55 +01:00
parent deb02d5c1a
commit 617765d5d4
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/Room/RunPast.hs
+2
View File
@@ -1,5 +1,6 @@
module Dodge.Room.RunPast where module Dodge.Room.RunPast where
import Dodge.UseAll import Dodge.UseAll
import Geometry.Polygon
import Dodge.LevelGen.Data import Dodge.LevelGen.Data
import Dodge.LightSource import Dodge.LightSource
--import Dodge.RoomLink --import Dodge.RoomLink
@@ -63,5 +64,6 @@ runPastRoom i = do
++ [return corridorWallN ++ [return corridorWallN
{_rmOutPmnt = [OutPlacement (putLitButOnPosExtTrig red useUnusedLnk) i] {_rmOutPmnt = [OutPlacement (putLitButOnPosExtTrig red useUnusedLnk) i]
,_rmPmnts = [] ,_rmPmnts = []
,_rmBound = [rectNSWE 70 30 0 40]
} }
] ]