Fix bug where new sounds didn't overplay old sounds

2021-08-26 22:56:11 +01:00
parent c97c16777a
commit c4df048d31
7 changed files with 82 additions and 34 deletions
@@ -159,7 +159,9 @@ isFrictionless cr = case cr ^? crStance . carriage of
    _                 -> False

 stepItemUseCooldown :: Creature -> Creature
-stepItemUseCooldown  cr = over (crInv . ix iSel . itUseTime) decreaseToZero cr
+stepItemUseCooldown cr = cr & crInv . ix iSel %~
+    (itUseTime %~ decreaseToZero) . (wpCurWarmUp %~ decreaseToZero)
+    --( over (crInv . ix iSel . itUseTime) decreaseToZero cr
  where 
    iSel = _crInvSel cr