# HG changeset patch
# User Wuzzy <Wuzzy2@mail.ru>
# Date 1548101215 -3600
# Node ID 4aec7d17ef7d14dddaaa191ab03e3996aee2dd32
# Parent  919754e1c2697de37d175bdcb55093564e1792b1
Don't show ammo caption for every repeat rope attach

diff -r 919754e1c269 -r 4aec7d17ef7d hedgewars/uGearsHandlersRope.pas
--- a/hedgewars/uGearsHandlersRope.pas	Mon Jan 21 20:17:44 2019 +0100
+++ b/hedgewars/uGearsHandlersRope.pas	Mon Jan 21 21:06:55 2019 +0100
@@ -417,9 +417,9 @@
     if (Gear^.State and gstAttacked) = 0 then
         begin
         OnUsedAmmo(HHGear^.Hedgehog^);
-        Gear^.State := Gear^.State or gstAttacked
+        Gear^.State := Gear^.State or gstAttacked;
+        ApplyAmmoChanges(HHGear^.Hedgehog^);
         end;
-    ApplyAmmoChanges(HHGear^.Hedgehog^)
 end;
 
 procedure doStepRopeAttach(Gear: PGear);