Cleanup

src/Dodge/Creature/State.hs

@@ -13,7 +13,7 @@ import Dodge.Creature.Impulse.Movement
 --import Dodge.Creature.Test
 --import Dodge.Base
 import Dodge.SoundLogic
-import Dodge.RandomHelp
+import RandomHelp
 import Dodge.WorldEvent
 --import Dodge.WallCreatureCollisions
 import Dodge.Creature.Action
@@ -36,7 +36,6 @@ import Control.Monad.State
 --import Control.Monad
 --import qualified SDL
 --import qualified SDL.Mixer as Mix
-import System.Random
 --import qualified Data.Set as S
 --import qualified Data.Map as M
 --import qualified Data.Vector as V