Cleanup impulses/actions

2025-10-18 16:00:08 +01:00
parent 4ee389efb1
commit 11c7b25fe9
4 changed files with 95 additions and 83 deletions
@@ -1,6 +1,6 @@
 module Dodge.Room.Tutorial where

--import Dodge.Room.LongDoor
+import Dodge.Room.LongDoor
 import Dodge.Layout
 import Dodge.Item.Held.Utility
 import Control.Monad
@@ -43,10 +43,10 @@ tutAnoTree = do
    foldMTRS
        [ tToBTree "TutStartRez" . return . cleatOnward <$> tutRezBox
        , corDoor
--        , corDoor
--        , tToBTree "t" . return . cleatOnward <$> slowDoorRoom
--        , corDoor
--        , corDoor
+        , corDoor
+        , tToBTree "t" . return . cleatOnward <$> slowDoorRoom
+        , corDoor
+        , corDoor
        , tutHub
        , tutLight
        , tutDrop