Cleanup

src/Dodge/LockAndKey.hs

@@ -4,7 +4,7 @@ import Dodge.Data
 import Dodge.Tree
 --import Dodge.LevelGen.Data
 import Dodge.Room
-import Dodge.RandomHelp
+import RandomHelp
 import Dodge.Creature
 import Dodge.Item.Craftable
 import Dodge.Item.Weapon.BulletGun.Rod
@@ -12,7 +12,6 @@ import Dodge.Item
 --import LensHelp
 --import Dodge.Item.Equipment
 
-import System.Random
 import Control.Monad.State
 
 bossKeyItems :: RandomGen g => [ (State g (SubCompTree Room), State g ItemBaseType) ]