--- a/hedgewars/uGearsHedgehog.pas	Thu Oct 24 21:18:22 2013 -0400
+++ b/hedgewars/uGearsHedgehog.pas	Sat Oct 26 13:58:49 2013 -0400
@@ -116,7 +116,7 @@
     // Try again in the next slot
     if CurAmmoType = prevAmmo then
         begin
-        if slot >= cMaxSlotIndex then slot:= 0 else inc(slot);
+        if slot < cMaxSlotIndex then inc(slot);
         HHGear^.MsgParam:= slot;
         ChangeAmmo(HHGear)
         end