Remove some Aeson processing

src/Dodge/Data/ComposedItem.hs

@@ -8,8 +8,8 @@ module Dodge.Data.ComposedItem where
 import Dodge.Data.AmmoType
 import Dodge.Data.DoubleTree
 import Control.Lens
-import Data.Aeson
-import Data.Aeson.TH
+--import Data.Aeson
+--import Data.Aeson.TH
 import Dodge.Data.Item
 import Geometry.Data
 import Linear.Quaternion (Quaternion (..))
@@ -91,5 +91,5 @@ makeLenses ''ItemLink
 makeLenses ''LinkTest
 makeLenses ''LinkUpdate
 makeLenses ''ComposeLinkType
-deriveJSON defaultOptions ''ItemStructuralFunction
-deriveJSON defaultOptions ''ComposeLinkType
+--deriveJSON defaultOptions ''ItemStructuralFunction
+--deriveJSON defaultOptions ''ComposeLinkType

src/Dodge/Data/WorldEffect.hs

@@ -7,12 +7,9 @@ module Dodge.Data.WorldEffect where
 
 import Dodge.Data.Input
 import Dodge.Data.LightSource
-import Dodge.Data.ComposedItem
-import Dodge.Data.DoubleTree
 import Data.Aeson
 import Data.Aeson.TH
 import Dodge.Data.CreatureEffect
-import Dodge.Data.Item
 import Dodge.Data.SoundOrigin
 import Geometry.Data
 import Sound.Data
@@ -32,7 +29,7 @@ data WdWd
     | MakeStartCloudAt Point3
     | TorqueCr Float Int
     | WdWdNegateTrig Int
-    | WdWdFromItCrixWdWd (LabelDoubleTree ComposeLinkType Item) Int ItCrWdWd
+--    | WdWdFromItCrixWdWd (LabelDoubleTree ComposeLinkType Item) Int ItCrWdWd
     | MakeTempLight LSParam Int
     | UseInvItem Int PressType
     | WdWdBurstFireRepetition Int Int