Cleanup

src/Dodge/Room/Start.hs

@@ -11,7 +11,7 @@ import Dodge.Room.LongDoor
 --import Dodge.Default
 --import Dodge.RoomLink
 import Dodge.Tree
-import Dodge.RandomHelp
+import RandomHelp
 import Dodge.Room.Door
 import Dodge.Room.RezBox
 import Dodge.Room.Corridor
@@ -28,7 +28,6 @@ import LensHelp
 --import Data.Maybe
 --import Data.Tree
 import Control.Monad.State
-import System.Random
 --import qualified Data.IntMap.Strict as IM
 
 powerFakeout :: RandomGen g => State g (SubCompTree Room)