Cleanup

src/Dodge/Layout.hs

@@ -21,7 +21,7 @@ import Geometry
 --import Geometry.ConvexPoly
 import qualified IntMapHelp as IM
 import Tile
-import Dodge.RandomHelp
+import RandomHelp
 import Color
 import Shape
 --import Padding
@@ -29,7 +29,6 @@ import Shape
 import Data.List (nubBy)
 import Data.Traversable
 import Control.Lens
-import System.Random
 import Data.Foldable
 import qualified Control.Foldl as L
 import Data.Maybe