Cleanup

2025-09-23 17:34:39 +01:00
parent 6984a34c19
commit 398b3a1342
12 changed files with 26 additions and 45 deletions
@@ -66,8 +66,8 @@ initialAnoTree =
              PassthroughLockKeyLists keyCardRunPastRand itemRooms
            , AnTree . intAnno $ warningRooms "INVISIBLE CREATURE AHEAD"
            , AnTree $
-                rToOnward "chaseCrit+armourChaseCrit rectRoom" =<<
-                    return . cleatOnward <$>
+                rToOnward "chaseCrit+armourChaseCrit rectRoom" .
+                    return . cleatOnward =<<
                        (roomRectAutoLinks 400 400 <&> rmPmnts
                            .++~ [ psPtPl anyUnusedSpot (PutCrit invisibleChaseCrit)
                                 , psPtPl anyUnusedSpot (PutCrit armourChaseCrit)