changeset 1352 | 405ad07cf875 |
parent 1346 | b4d51b95aa16 |
child 1367 | e1aaa1a4901f |
--- a/hedgewars/uGears.pas Mon Oct 13 19:04:27 2008 +0000 +++ b/hedgewars/uGears.pas Tue Oct 14 14:33:54 2008 +0000 @@ -446,11 +446,11 @@ AllInactive:= true; t:= GearsList; while t <> nil do - begin - Gear:= t; - t:= Gear^.NextGear; - if Gear^.Active then Gear^.doStep(Gear); - end; + begin + Gear:= t; + t:= Gear^.NextGear; + if Gear^.Active then Gear^.doStep(Gear); + end; if AllInactive then case step of