Refactor, try to limit dependencies

src/Dodge/Data/Damage/Type.hs

@@ -1,27 +1,31 @@
-{-# LANGUAGE DeriveGeneric #-}
 {-# LANGUAGE StrictData #-}
+{-# LANGUAGE TemplateHaskell #-}
+
 module Dodge.Data.Damage.Type where
-import GHC.Generics
+
 import Data.Aeson
-data DamageType 
-    = PIERCING 
-    | BLUNT    
-    | CUTTING  
+import Data.Aeson.TH
+
+data DamageType
+    = PIERCING
+    | BLUNT
+    | CUTTING
     | SPARKING
     | CRUSHING
     | SHATTERING
-    | FLAMING  
-    | LASERING 
+    | FLAMING
+    | LASERING
     | ELECTRICAL
     | EXPLOSIVE
     | CONCUSSIVE
-    | TORQUEDAM 
-    | PUSHDAM   
-    | POISONDAM 
+    | TORQUEDAM
+    | PUSHDAM
+    | POISONDAM
     | ENTERREMENT
-  deriving (Eq,Ord,Show,Read,Enum,Bounded,Generic)
-instance ToJSON DamageType where
-    toEncoding = genericToEncoding defaultOptions
-instance FromJSON DamageType 
+    deriving (Eq, Ord, Show, Read, Enum, Bounded)
+
 instance ToJSONKey DamageType
-instance FromJSONKey DamageType 
+
+instance FromJSONKey DamageType
+
+deriveJSON defaultOptions ''DamageType