Remove consumable records

src/Dodge/Data/Item/Use.hs

@@ -39,11 +39,6 @@ data ItemUse
         }
     deriving (Eq, Show, Read)
 
-data UseFocus
-    = UseFromRoot
-    | UseFromLocation
-    deriving (Eq, Show, Read)
-
 data AttachParams
     = APProjectiles {_apProjectiles :: [Int]}
     | APInt {_apInt :: Int}
@@ -60,10 +55,7 @@ data AmmoParams
 makeLenses ''ItemUse
 makeLenses ''AttachParams
 makeLenses ''AmmoParams
---makeLenses ''UseCondition
-makeLenses ''UseFocus
---deriveJSON defaultOptions ''UseFocus
---deriveJSON defaultOptions ''UseCondition
-deriveJSON defaultOptions ''AmmoParams
+--makeLenses ''UseFocus
+--deriveJSON defaultOptions ''AmmoParams
 deriveJSON defaultOptions ''AttachParams
 deriveJSON defaultOptions ''ItemUse