fix for issue #238
authornemo
Tue, 13 Sep 2011 17:49:39 -0400
changeset 5893 368669bf6cb3
parent 5892 6340fa683746
child 5894 86c59c34cdd5
fix for issue #238
hedgewars/GSHandlers.inc
--- a/hedgewars/GSHandlers.inc	Tue Sep 13 21:15:23 2011 +0400
+++ b/hedgewars/GSHandlers.inc	Tue Sep 13 17:49:39 2011 -0400
@@ -2713,7 +2713,7 @@
         repeat
             CurrentTeam^.CurrHedgehog := Succ(CurrentTeam^.CurrHedgehog) mod (CurrentTeam^.
                                          HedgehogsNumber);
-        until (CurrentTeam^.Hedgehogs[CurrentTeam^.CurrHedgehog].Gear <> nil);
+        until (CurrentTeam^.Hedgehogs[CurrentTeam^.CurrHedgehog].Gear <> nil) and (CurrentTeam^.Hedgehogs[CurrentTeam^.CurrHedgehog].Gear^.Damage = 0);
 
         CurrentHedgehog := @CurrentTeam^.Hedgehogs[CurrentTeam^.CurrHedgehog];