Tweak longRoom

2022-03-20 13:46:31 +00:00
parent e811e67ff9
commit 6c3e335ded
6 changed files with 25 additions and 30 deletions
@@ -68,10 +68,6 @@ anoToRoomTree anos = case anos of
        a <- takeOne as
        anoToRoomTree a
    [Corridor] -> pure . UseAll <$> shuffleLinks corridor
-    [FirstWeapon] -> do
-        branchWP <- branchRectWith weaponRoom
-        blockedC <- longBlockedCorridor 3
-        join $ takeOne $ return (passUntilUseAll branchWP [blockedC]) : replicate 5 weaponRoom
    (SpecificRoom rt:_) -> rt
    (BossAno cr : _) -> do
        br <- bossRoom cr