hedgewars/uGears.pas
changeset 15359 c117e17b90bc
parent 15220 ceb289e8a582
child 15436 617f4c092e3d
equal deleted inserted replaced
15358:b5e0a39856fd 15359:c117e17b90bc
   274             if curHandledGear^.Message and gmAddToList <> 0 then InsertGearToList(curHandledGear);
   274             if curHandledGear^.Message and gmAddToList <> 0 then InsertGearToList(curHandledGear);
   275             curHandledGear^.Message:= curHandledGear^.Message and (not (gmRemoveFromList or gmAddToList))
   275             curHandledGear^.Message:= curHandledGear^.Message and (not (gmRemoveFromList or gmAddToList))
   276             end;
   276             end;
   277         if curHandledGear^.Active then
   277         if curHandledGear^.Active then
   278             begin
   278             begin
   279             if curHandledGear^.RenderTimer then
   279             if (not cOnlyStats) and curHandledGear^.RenderTimer then
   280                 begin
   280                 begin
   281                 // Mine timer
   281                 // Mine timer
   282                 if (curHandledGear^.Kind in [gtMine, gtSMine, gtAirMine]) then
   282                 if (curHandledGear^.Kind in [gtMine, gtSMine, gtAirMine]) then
   283                     begin
   283                     begin
   284                     if curHandledGear^.Tex = nil then
   284                     if curHandledGear^.Tex = nil then