hedgewars/GSHandlers.inc
changeset 7395 d0d38cd0d27c
parent 7394 789d7831ec53
child 7396 7c0e07c23aad
--- a/hedgewars/GSHandlers.inc	Mon Jul 16 23:12:59 2012 +0400
+++ b/hedgewars/GSHandlers.inc	Mon Jul 16 23:46:44 2012 +0400
@@ -2947,7 +2947,7 @@
                         end
                 end;
         AfterAttack;
-        DeleteGear(HHGear);
+        HHGear^.Message:= HHGear^.Message or gmDestroy;
         DeleteGear(Gear);
     end
     else