Refactor, try to limit dependencies

src/Dodge/Data/Spark.hs

@@ -1,23 +1,24 @@
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE TemplateHaskell #-}
 {-# LANGUAGE StrictData #-}
+{-# LANGUAGE TemplateHaskell #-}
+
 module Dodge.Data.Spark where
-import GHC.Generics
-import Data.Aeson
-import Dodge.Data.Damage.Type
-import Geometry.Data
+
 import Color
 import Control.Lens
+import Data.Aeson
+import Data.Aeson.TH
+import Dodge.Data.Damage.Type
+import Geometry.Data
+
 data Spark = Spark
-    { _skVel    :: Point2
-    , _skColor  :: Color
-    , _skPos    :: Point2
+    { _skVel :: Point2
+    , _skColor :: Color
+    , _skPos :: Point2
     , _skOldPos :: Point2
-    , _skWidth  :: Float 
+    , _skWidth :: Float
     , _skDamageType :: DamageType
     }
-  deriving (Eq,Ord,Show,Read,Generic)
-instance ToJSON Spark  where
-    toEncoding = genericToEncoding defaultOptions
-instance FromJSON Spark 
+    deriving (Eq, Ord, Show, Read)
+
 makeLenses ''Spark
+deriveJSON defaultOptions ''Spark