hedgewars/uGears.pas
changeset 2882 b9aceb3fe3d6
parent 2877 7c0d17ac0902
child 2888 69d04079fb46
--- a/hedgewars/uGears.pas	Sun Feb 28 15:41:42 2010 +0000
+++ b/hedgewars/uGears.pas	Sun Feb 28 16:03:33 2010 +0000
@@ -311,6 +311,7 @@
                 gear^.Y:= gear^.Y;
                 end;
         gtMine: begin
+                gear^.Health:= 10;
                 gear^.State:= gear^.State or gstMoving;
                 gear^.Radius:= 2;
                 gear^.Elasticity:= _0_55;