From f404f322410f7e3a9570dcc54d855852a44f474c Mon Sep 17 00:00:00 2001
From: justin <justin.g.kruger@gmail.com>
Date: Wed, 15 Jun 2022 21:03:22 +0100
Subject: [PATCH] Cleanup

---
 src/Dodge/Floor.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Dodge/Floor.hs b/src/Dodge/Floor.hs
index 0d19893b1..9898d05de 100644
--- a/src/Dodge/Floor.hs
+++ b/src/Dodge/Floor.hs
@@ -40,7 +40,7 @@ initialAnoTree :: Annotation
 initialAnoTree = OnwardList 
         $ intersperse (AnTree corDoor)
     [ IntAnno $ AnTree . startRoom
-    , AnRoom roomPillarsSquare
+--    , AnRoom roomPillarsSquare
     , AnTree firstBreather
 --     ,  (SpecificRoom . return . tToBTree $ treePost [corridor,corridor,cleatOnward corridor])
     , AnRoom $ roomCCrits 10