# HG changeset patch
# User Wuzzy <Wuzzy2@mail.ru>
# Date 1547678603 -3600
# Node ID 7c5a9c1b9d4edc5313ee5af69776ef539b80053f
# Parent  244699a9773448215f00047f4663083ee5c6cf5a
Fix DismissTeam not clearing the team properly

diff -r 244699a97734 -r 7c5a9c1b9d4e hedgewars/uScript.pas
--- a/hedgewars/uScript.pas	Wed Jan 16 22:48:48 2019 +0100
+++ b/hedgewars/uScript.pas	Wed Jan 16 23:43:23 2019 +0100
@@ -2541,6 +2541,8 @@
                             AddVisualGear(hwRound(HHGear^.X) - 16 + Random(32), hwRound(HHGear^.Y) - 16 + Random(32), vgtSmokeWhite);
                             end;
                         HHGear^.Message:= HHGear^.Message or gmDestroy;
+                        HHGear^.Active:= true;
+                        AllInactive:= false;
                         end;
                     end;
                 // can't dismiss more than one team