Tweak airlock door to stop z fighting

This commit is contained in:
2021-04-22 14:42:49 +02:00
parent 1ab793180c
commit 6c65515381
4 changed files with 24 additions and 10 deletions
+2 -1
View File
@@ -33,7 +33,8 @@ roomTreex = do
struct' <- aTreeStrut
let struct = Node [EndRoom] []
let t' = padCorridors struct
t = treeTrunk [[StartRoom],[OrAno [[DoorAno],[Corridor]] ],[FirstWeapon],[Corridor]] t'
t = treeTrunk [[StartRoom],[OrAno [--[DoorAno],[Corridor],
[DoorNumAno 0,AirlockAno]] ],[FirstWeapon],[Corridor]] t'
fmap (shiftExpandTree . expandTreeBy id) $ mapM annoToRoomTree t
levx :: RandomGen g => State g [Room]