hedgewars/uAmmos.pas
branch0.9.14.1
changeset 4330 1e03ca5d4311
parent 4234 60920aeb1606
child 4339 58d4733c9cad
--- a/hedgewars/uAmmos.pas	Sun Nov 14 20:35:39 2010 +0300
+++ b/hedgewars/uAmmos.pas	Sun Nov 14 12:53:33 2010 -0500
@@ -171,7 +171,10 @@
           if Hedgehogs[i].Gear <> nil then
              begin
              Hedgehogs[i].Ammo:= GetAmmoByNum(Hedgehogs[i].AmmoStore);
-             Hedgehogs[i].CurAmmoType:= amNothing;
+             if (GameFlags and gfPlaceHog) <> 0 then
+                Hedgehogs[i].CurAmmoType:= amTeleport
+             else
+                Hedgehogs[i].CurAmmoType:= amNothing
              end
       end
 end;