Remove heldParams record
This commit is contained in:
@@ -33,7 +33,7 @@ data ItemUse
|
||||
= UseHeld
|
||||
{ _heldDelay :: UseDelay
|
||||
, _heldMuzzles :: [Muzzle]
|
||||
, _heldParams :: HeldParams
|
||||
-- , _heldParams :: HeldParams
|
||||
, _heldFrame :: Int
|
||||
, _heldUseEffect :: HeldUseEffect
|
||||
}
|
||||
@@ -73,12 +73,12 @@ data AttachParams
|
||||
| APNothing
|
||||
deriving (Eq, Show, Read)
|
||||
|
||||
data HeldParams
|
||||
= DefaultHeldParams
|
||||
| GasSprayParams { _weaponInvLock :: Int }
|
||||
| BeamShooterParams
|
||||
| BulletShooterParams { _weaponInvLock :: Int }
|
||||
deriving (Eq, Show, Read) --Generic, Flat)
|
||||
--data HeldParams
|
||||
-- = DefaultHeldParams
|
||||
-- | GasSprayParams { _weaponInvLock :: Int }
|
||||
-- | BeamShooterParams
|
||||
-- | BulletShooterParams { _weaponInvLock :: Int }
|
||||
-- deriving (Eq, Show, Read) --Generic, Flat)
|
||||
|
||||
data AmmoParams
|
||||
= BulletParams {_ampBullet :: Bullet}
|
||||
@@ -149,7 +149,7 @@ makeLenses ''ItemUse
|
||||
|
||||
--makeLenses ''AimParams
|
||||
makeLenses ''Muzzle
|
||||
makeLenses ''HeldParams
|
||||
--makeLenses ''HeldParams
|
||||
makeLenses ''AttachParams
|
||||
makeLenses ''AmmoParams
|
||||
makeLenses ''MuzzleEffect
|
||||
@@ -163,7 +163,7 @@ deriveJSON defaultOptions ''UseCondition
|
||||
deriveJSON defaultOptions ''MuzzleEffect
|
||||
deriveJSON defaultOptions ''FlareType
|
||||
deriveJSON defaultOptions ''AmmoParams
|
||||
deriveJSON defaultOptions ''HeldParams
|
||||
--deriveJSON defaultOptions ''HeldParams
|
||||
deriveJSON defaultOptions ''AmmoPerShot
|
||||
deriveJSON defaultOptions ''Muzzle
|
||||
deriveJSON defaultOptions ''AttachParams
|
||||
|
||||
Reference in New Issue
Block a user