hedgewars/GSHandlers.inc
changeset 4977 c89cca0a8785
parent 4976 088d40d8aba2
child 5013 04789ba3f200
--- a/hedgewars/GSHandlers.inc	Wed Mar 02 00:27:20 2011 +0100
+++ b/hedgewars/GSHandlers.inc	Wed Mar 02 11:48:02 2011 -0500
@@ -1741,7 +1741,7 @@
                     PlaySound(sndVaporize);
                     Gear^.Health := 0;
                     Gear^.Damage := 0;
-AddFileLog('initial mine damage:'+IntToStr(Gear^.Damage));
+                    Gear^.State := Gear^.State and not gstAttacking
                     end;
                 exit
                 end;