Tweaks concerning item types

src/Dodge/RadarSweep.hs

@@ -1,9 +1,8 @@
-module Dodge.RadarSweep 
-    ( aRadarPulse
-    , updateRadarSweep
-    ) where
+module Dodge.RadarSweep (
+    aRadarPulse,
+    updateRadarSweep,
+) where
 
-import NewInt
 import Color
 import Data.Maybe
 import Dodge.Data.World
@@ -11,6 +10,7 @@ import Dodge.Zoning.Wall
 import Geometry
 import qualified IntMapHelp as IM
 import LensHelp
+import NewInt
 
 aRadarPulse :: ObjectType -> Creature -> World -> World
 aRadarPulse ob cr =