Cleanup

src/Dodge/Room/LongDoor.hs

@@ -16,7 +16,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
@@ -26,7 +26,6 @@ import LensHelp
 --import Shape
 
 import qualified Data.Set as S
-import System.Random
 import Control.Monad.State
 import Data.Maybe
 --import Data.Tree