Cleanup

src/Dodge/Room/LongRoom.hs

@@ -14,7 +14,7 @@ import Dodge.Room.Procedural
 --import Dodge.Layout.Tree.Either
 --import Dodge.LevelGen.Data
 --import Dodge.LevelGen.Switch
-import Dodge.RandomHelp
+import RandomHelp
 import Dodge.Creature.Inanimate
 import Dodge.Creature
 --import Dodge.LightSource
@@ -24,7 +24,6 @@ import LensHelp
 import Data.Tile
 
 import qualified Data.Set as S
-import System.Random
 import Control.Monad.State
 --import qualified Data.IntMap as IM