Refactor, try to limit dependencies

src/Dodge/Wall/Zone.hs

@@ -1,10 +1,8 @@
-module Dodge.Wall.Zone
-    where
-import Dodge.Zoning.Wall
-import Dodge.Data
+module Dodge.Wall.Zone where
 
---import qualified Data.IntSet as IS
 import Control.Lens
+import Dodge.Data.World
+import Dodge.Zoning.Wall
 
 -- need to verify that this not only inserts but also overwrites (updates) any
 -- already existing walls
@@ -19,4 +17,5 @@ insertWallInZones wl = cWorld . wlZoning %~ zoneWall wl
 
 deleteWallFromZones :: Wall -> World -> World
 deleteWallFromZones wl = cWorld . wlZoning %~ deZoneWall wl
+
 --    %~ flip (foldl' (flip $ \(a,b) updateeIMInZone a b (_wlID wl))) (zoneOfWall wl)