hedgewars/uGearsList.pas
changeset 12119 3374e0f67f39
parent 12094 4dfc95eabee1
child 12169 869cf5f34700
--- a/hedgewars/uGearsList.pas	Sun Jan 15 12:49:26 2017 -0500
+++ b/hedgewars/uGearsList.pas	Sun Jan 15 12:50:27 2017 -0500
@@ -508,7 +508,11 @@
                 gear^.Density:= _1_5;
                 gear^.RenderTimer:= true
                 end;
-      gtShover: gear^.Radius:= 20;
+      gtShover: begin
+                gear^.Radius:= 20;
+                gear^.Tag:= 0;
+                gear^.Timer:= 100;
+                end;
        gtFlame: begin
                 gear^.Tag:= GetRandom(32);
                 gear^.Radius:= 1;