Simplify tank decorations
This commit is contained in:
@@ -49,7 +49,8 @@ tutAnoTree = do
|
||||
[ tToBTree "TutStartRez" . return . cleatOnward <$> tutRezBox
|
||||
, corDoor
|
||||
, return $ tToBTree "cor" $ return $ cleatOnward corridor
|
||||
, tToBTree "sdr" . return . cleatOnward <$> slowDoorRoom
|
||||
--, tToBTree "sdr" . return . cleatOnward <$> slowDoorRoom
|
||||
, tToBTree "sdr" . return . cleatOnward <$> tanksPipesRoom
|
||||
, return $ tToBTree "cor" $ return $ cleatOnward corridor
|
||||
, return $ tToBTree "cor" $ return $ cleatOnward corridor
|
||||
, return $ tToBTree "cor" $ return $ cleatOnward corridor
|
||||
|
||||
Reference in New Issue
Block a user