changeset 3086 | d11dea92fa2c |
parent 3083 | 8da8f2515221 |
child 3094 | 97c8406acc85 |
--- a/hedgewars/uGears.pas Fri Mar 26 17:43:21 2010 +0000 +++ b/hedgewars/uGears.pas Fri Mar 26 19:59:15 2010 +0000 @@ -317,10 +317,6 @@ gear^.Friction:= _450; RopePoints.Count:= 0; end; - gtExplosion: begin - gear^.X:= gear^.X; - gear^.Y:= gear^.Y; - end; gtMine: begin gear^.Health:= 10; gear^.State:= gear^.State or gstMoving; @@ -448,8 +444,6 @@ gear^.FlightTime := 2; end; gtBigExplosion: begin - gear^.X:= gear^.X; - gear^.Y:= gear^.Y; gear^.Angle:= random(360); end; gtEgg: begin