Refactor, try to limit dependencies

src/Dodge/Data/FloorItem.hs

@@ -1,16 +1,16 @@
-{-# LANGUAGE TemplateHaskell #-}
 {-# LANGUAGE StrictData #-}
-{-# LANGUAGE DeriveGeneric #-}
-module Dodge.Data.FloorItem
-    where
+{-# LANGUAGE TemplateHaskell #-}
+
+module Dodge.Data.FloorItem where
+
+import Control.Lens
+import Data.Aeson
+import Data.Aeson.TH
 import Dodge.Data.Item
 import Geometry.Data
-import GHC.Generics
-import Data.Aeson
-import Control.Lens
-data FloorItem = FlIt { _flIt :: Item , _flItPos :: Point2 , _flItRot :: Float, _flItID :: Int}
-  deriving (Eq,Show,Read,Generic)
-instance ToJSON FloorItem where
-    toEncoding = genericToEncoding defaultOptions
-instance FromJSON FloorItem
+
+data FloorItem = FlIt {_flIt :: Item, _flItPos :: Point2, _flItRot :: Float, _flItID :: Int}
+    deriving (Eq, Show, Read)
+
 makeLenses ''FloorItem
+deriveJSON defaultOptions ''FloorItem