--- a/hedgewars/uGears.pas	Mon Mar 14 20:08:53 2011 +0300
+++ b/hedgewars/uGears.pas	Wed Mar 16 17:25:05 2011 +0100
@@ -129,7 +129,7 @@
             @doStepNapalmBomb,
             @doStepSnowball,
             @doStepSnowflake,
-            @doStepStructure
+            @doStepPlaceStructure
             );
 
 procedure InsertGearToList(Gear: PGear);
@@ -519,6 +519,7 @@
                 gear^.Radius:= 13;
                 gear^.Elasticity:= _0_3;
                 gear^.Health:= 50;
+                gear^.Tag:= 3;
                 end;
     end;