Refactor targeting

2022-07-21 00:10:05 +01:00
parent a89b0c784f
commit 39117b4dfe
8 changed files with 116 additions and 77 deletions
@@ -71,7 +71,7 @@ unsafeBlinkGun = blinkGun
 forceFieldGun :: Item
 forceFieldGun = defaultWeapon 
    { _itConsumption = defaultLoadable & laAmmoType .~ ForceFieldAmmo forceField
-    , _itTargeting = targetRBPress & tgDraw .~ targetDistanceDraw
+    , _itTargeting = targetRBPress & tgDraw .~ TargetDistanceDraw
    , _itParams = ParamMID Nothing
    }
    & itUse . rUse .~ HeldForceField --useForceFieldGun