Single source of truth for wall pathing

src/Dodge/Room/Door.hs

@@ -41,6 +41,6 @@ triggerDoorRoom i =
   where
     f gw = fromMaybe (error "tried to put a door using an empty placement list") $ do
         pmnt <- gw ^? genPmnt . ix i
-        return $ putDoubleDoor 
+        return $ putDoubleDoor False 
             switchWallObs defaultDoorWall (cond pmnt) (V2 0 20) (V2 40 20) 2
     cond pmnt = WdTrig $ fromJust (_plMID pmnt)