hedgewars/uAIMisc.pas
changeset 191 a03c2d037e24
parent 183 57c2ef19f719
child 351 29bc9c36ad5f
--- a/hedgewars/uAIMisc.pas	Thu Oct 05 20:13:51 2006 +0000
+++ b/hedgewars/uAIMisc.pas	Sun Oct 08 18:17:52 2006 +0000
@@ -109,7 +109,6 @@
 begin
 bonuses.Count:= 0;
 MyColor:= PHedgehog(ThinkingHH.Hedgehog).Team.Color;
-SDL_LockMutex(GearsListMutex);
 Gear:= GearsList;
 while Gear <> nil do
       begin
@@ -127,7 +126,6 @@
            end;
       Gear:= Gear.NextGear
       end;
-SDL_UnlockMutex(GearsListMutex);
 if isAfterAttack and (KnownExplosion.Radius > 0) then
    with KnownExplosion do
         AddBonus(X, Y, Radius + 10, -Radius);