Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uGears.pas
changeset 1869 490005509a7b
parent 1868 2fe8d045f6a1
child 1892 fddc1201df25 
--- a/hedgewars/uGears.pas	Sat Mar 07 20:23:49 2009 +0000
+++ b/hedgewars/uGears.pas	Sun Mar 08 12:55:40 2009 +0000
@@ -434,7 +434,8 @@
 		if (Gear^.Damage <> 0) and
 		(not Gear^.Invulnerable) then
 			begin
-            if (PHedgehog(Gear^.Hedgehog)^.Team = CurrentTeam) then
+            if (PHedgehog(Gear^.Hedgehog)^.Team = CurrentTeam) and
+               (Gear^.Damage <> int(cHealthDecrease)) then
                 Gear^.State:= Gear^.State or gstLoser;
 			CheckNoDamage:= false;
 			uStats.HedgehogDamaged(Gear);
hedgewars