Move towards using item structural function when using items

2024-10-05 20:53:50 +01:00
parent 7c324a03f6
commit 3b54f00cc7
16 changed files with 142 additions and 111 deletions
@@ -58,11 +58,11 @@ data ItemUse
        , _amagType :: AmmoType
        }
    | UseScope { _uScope :: Scope }
-    | UseTargeting
-        { _tgPos :: Maybe Point2
-        , _tgID :: Maybe Int
-        , _tgActive :: Bool
-        }
+--    | UseTargeting
+--        { _tgPos :: Maybe Point2
+--        , _tgID :: Maybe Int
+--        , _tgActive :: Bool
+--        }
    | UseBulletMod { _ubMod :: BulletMod }
    deriving (Eq, Show, Read)