Remove parameters from machine damage sensors

src/Dodge/Data/Machine/Sensor.hs

@@ -8,29 +8,23 @@ module Dodge.Data.Machine.Sensor (
     module Dodge.Data.Machine.Sensor.Type,
 ) where
 
-import Geometry.Data
-import Color
 import Control.Lens
 import Data.Aeson
 import Data.Aeson.TH
-import Dodge.Data.GenParams
 import Dodge.Data.Item.Combine
 import Dodge.Data.Machine.Sensor.Type
+import Geometry.Data
 
 data DamageSensor = DamSensor
-        { _sensToggle :: Bool
-        , _sensAmount :: Int
-        , _sensType :: SensorType
-        , _sensDraw :: (PaletteColor, DecorationShape)
-        , _sensThreshold :: Int
-        }
+    { _sensAmount :: Int
+    , _sensType :: SensorType
+    , _sensThreshold :: Int
+    }
 
 data ProximitySensor = ProxSensor
-        { _proxRequirement :: ProximityRequirement
-        , _proxToggle :: Bool
-        }
-
---deriving (Eq, Ord, Show, Read) --Generic, Flat)
+    { _proxRequirement :: ProximityRequirement
+    , _proxToggle :: Bool
+    }
 
 data ProximityRequirement
     = RequireHealth {_proxReqMinHealth :: Int}