hedgewars/uGears.pas
changeset 7517 f287f00063e8
parent 7477 26706bf32ecf
child 7519 14261378d074
--- a/hedgewars/uGears.pas	Tue Aug 07 13:21:15 2012 -0400
+++ b/hedgewars/uGears.pas	Wed Aug 08 10:26:10 2012 -0400
@@ -207,6 +207,8 @@
     curHandledGear:= t;
     t:= curHandledGear^.NextGear;
 
+    if curHandledGear^.Message and gmDelete <> 0 then
+        DeleteGear(curHandledGear);
     if curHandledGear^.Message and gmRemoveFromList <> 0 then 
         begin
         RemoveGearFromList(curHandledGear);