Fix worldEvent reset space leak

2021-08-18 13:18:46 +02:00
parent a6f08aef16
commit 910c29a510
12 changed files with 34 additions and 33 deletions
@@ -142,9 +142,7 @@ naked col cr
    aimingOneHand = crIsAiming' cr && crIt ^? itAimStance == Just OneHand
    aimingTwist = crIsAiming' cr && crIt ^? itAimStance == Just TwoHandTwist
    crIt = _crInv cr IM.! _crInvSel cr
-    strikeMelee = case _crMeleeCooldown cr of
-        Nothing -> False
-        Just x  -> x > 5
+    strikeMelee = _crMeleeCooldown cr > 5
    pdam = sum $ concatMap (map _dmAmount) pastDams
    crad = _crRad cr
    pastDams = _crPastDamage $ _crState cr