hedgewars/uScript.pas
changeset 13618 edffc9b7ad58
parent 13617 a6abc2c1fc1a
child 13627 605767bbd022
--- a/hedgewars/uScript.pas	Mon Aug 06 22:39:39 2018 +0200
+++ b/hedgewars/uScript.pas	Tue Aug 07 01:24:57 2018 +0200
@@ -1320,7 +1320,7 @@
         for i:= 0 to Pred(clan^.TeamsNumber) do
             begin
             team:= clan^.Teams[i];
-            for j:= 0 to 7 do
+            for j:= 0 to cMaxHHIndex do
                 begin
                 hh:= team^.Hedgehogs[j];
                 if (hh.Gear <> nil) or (hh.GearHidden <> nil) then