# HG changeset patch
# User unc0rr
# Date 1289151376 -10800
# Node ID 5240a84df7029b400a8ec87cccd3de24ff375d2e
# Parent  1f37ff58062f193181d284ec218f9e9327b12653
Fix rev dec8aafc6414 (not tested)

diff -r 1f37ff58062f -r 5240a84df702 hedgewars/GSHandlers.inc
--- a/hedgewars/GSHandlers.inc	Sun Nov 07 20:33:34 2010 +0300
+++ b/hedgewars/GSHandlers.inc	Sun Nov 07 20:36:16 2010 +0300
@@ -1769,7 +1769,7 @@
 
     AmmoShove(Gear, 30, 115);
 
-    HHGear^.State := HHGear^.State and not gstNoDamage;
+    HHGear^.State := (HHGear^.State and (not gstNoDamage)) or gstMoving;
     Gear^.Timer := 250;
     Gear^.doStep := @doStepIdle
 end;
@@ -1790,7 +1790,8 @@
         Gear^.X := Gear^.X + Gear^.dX * 5
     end;
 
-    HHGear^.State := HHGear^.State and not gstNoDamage;
+    HHGear^.State := (HHGear^.State and (not gstNoDamage)) or gstMoving;
+
     Gear^.Timer := 250;
     Gear^.doStep := @doStepIdle
 end;
diff -r 1f37ff58062f -r 5240a84df702 hedgewars/uGears.pas
--- a/hedgewars/uGears.pas	Sun Nov 07 20:33:34 2010 +0300
+++ b/hedgewars/uGears.pas	Sun Nov 07 20:36:16 2010 +0300
@@ -1415,9 +1415,7 @@
     begin
     t^.ar[t^.Count]:= CurrentHedgehog^.Gear;
     inc(t^.Count)
-    end else
-    with CurrentHedgehog^.Gear^ do
-        State:= State or gstMoving;
+    end;
 
 i:= t^.Count;