hedgewars/uGears.pas
changeset 7411 efc75c2d3be9
parent 7407 c1ade666c124
parent 7257 566bdf2f023b
child 7628 bc7b1d228a2c
--- a/hedgewars/uGears.pas	Fri Jul 20 18:48:04 2012 -0400
+++ b/hedgewars/uGears.pas	Thu Aug 30 12:13:24 2012 -0400
@@ -564,7 +564,7 @@
 Gear:= GearsList;
 while Gear <> nil do
     begin
-    if Gear^.State and gstInvisible = 0 then
+    if (Gear^.State and gstInvisible = 0) and (Gear^.Message and gmRemoveFromList = 0) then
         begin
         x:= hwRound(Gear^.X) + WorldDx;
         y:= hwRound(Gear^.Y) + WorldDy;