--- a/hedgewars/HHHandlers.inc	Thu May 24 18:48:35 2007 +0000
+++ b/hedgewars/HHHandlers.inc	Thu May 24 19:41:51 2007 +0000
@@ -72,6 +72,7 @@
                    amMineStrike: AddGear(Ammo^[CurSlot, CurAmmo].Pos, 0, gtAirAttack, 1, _0, _0, 0);
                     amBlowTorch: CurAmmoGear:= AddGear(hwRound(X), hwRound(Y), gtBlowTorch, 0, SignAs(_0_5, dX), _0, 0);
                        amGirder: CurAmmoGear:= AddGear(0, 0, gtGirder, Ammo^[CurSlot, CurAmmo].Pos, _0, _0, 0);
+                     amTeleport: CurAmmoGear:= AddGear(0, 0, gtTeleport, 0, _0, _0, 0);
                   end;
         Power:= 0;
         if CurAmmoGear <> nil then