Fix placement movement bug

src/Dodge/Room/NoNeedWeapon.hs

@@ -25,9 +25,8 @@ To solve this, here we delete unwanted links.
 -}
 centerVaultExplosiveExit
     :: RandomGen g 
-    => Int      -- ^ Door id
-    -> State g Room
-centerVaultExplosiveExit drid = do
+    => State g Room
+centerVaultExplosiveExit = do
     cr <- takeOne [miniGunCrit, autoCrit]
     let extraPS = 
             [sPS (V2 0 175) 0 $ PutCrit explosiveBarrel
@@ -36,5 +35,5 @@ centerVaultExplosiveExit drid = do
             ,sPS (V2 (-4) 195) 0 $ PutCrit explosiveBarrel
             ,sPS (V2 0 0) 0 $ PutCrit (cr & crState . crDropsOnDeath .~ DropAll)
             ]
-    r <- centerVaultRoom drid 200 200 50 <&> rmPS %~ (extraPS ++)
+    r <- centerVaultRoom 200 200 50 <&> rmPS %~ (extraPS ++)
     randomiseLinksBy shuffleTail r <&> rmLinks %~ take 2