--- a/hedgewars/HHHandlers.inc	Wed Jul 12 15:39:58 2006 +0000
+++ b/hedgewars/HHHandlers.inc	Sun Jul 16 08:13:51 2006 +0000
@@ -74,6 +74,7 @@
                                  FollowGear:= AddGear(round(X), round(Y), gtDEagleShot,   0, xx * 0.5, yy * 0.5);
                                  end;
                      amDynamite: AddGear(round(X) + Sign(dX) * 7, round(Y), gtDynamite, 0, Sign(dX) * 0.035, 0, 5000);
+                  amBaseballBat: AddGear(round(X) + Sign(dX) * 10, round(Y), gtShover, 0, xx * 0.5, yy * 0.5).Radius:= 15
                   end;
         Power:= 0;
         if CurAmmoGear <> nil then