Add ngon rooms

src/Dodge/Room/Start.hs

@@ -48,12 +48,12 @@ minigunfakeout = do
         `treeFromPost` Right door
 
 centralLasTurret :: Room
-centralLasTurret = roomOctogon
+centralLasTurret = roomNgon 8
 
 rezThenLasTurret :: RandomGen g => State g (Tree (Either Room Room))
 rezThenLasTurret = do
     rbox <- rezBoxStart 
-    return $ rbox `appendEitherTree` [return $ Right roomOctogon]
+    return $ rbox `appendEitherTree` [return $ Right centralLasTurret]
 
 startRoom :: RandomGen g => State g (Tree (Either Room Room))
 startRoom = join $ takeOne