--- a/hedgewars/uTeams.pas	Wed Nov 29 20:33:07 2006 +0000
+++ b/hedgewars/uTeams.pas	Thu Nov 30 16:44:42 2006 +0000
@@ -275,7 +275,10 @@
              and (Ammo[Slot, ami + 1].Count > 0) then b:= true
                                                  else inc(ami);
       if b then // there's a free item in ammo stack
-         Ammo[Slot, ami]:= Ammo[Slot, ami + 1]
+         begin
+         Ammo[Slot, ami]:= Ammo[Slot, ami + 1];
+         Ammo[Slot, ami + 1].Count:= 0
+         end;
     until not b;
 end;