hedgewars/uTeams.pas
changeset 4479 59e11a5a3bfa
parent 4465 743673c67d0c
child 4480 fcada5d38b3d
--- a/hedgewars/uTeams.pas	Tue Dec 07 22:02:09 2010 +0300
+++ b/hedgewars/uTeams.pas	Tue Dec 07 17:29:02 2010 -0500
@@ -36,7 +36,7 @@
 procedure TeamGoneEffect(var Team: TTeam);
 
 implementation
-uses uLocale, uAmmos, uChat, uMobile, uVariables, uUtils, uIO, uCaptions, uCommands, uDebug;
+uses uLocale, uAmmos, uChat, uMobile, uVariables, uUtils, uIO, uCaptions, uCommands, uDebug, uScript;
 
 const MaxTeamHealth: LongInt = 0;
 
@@ -291,6 +291,7 @@
 
 CurrentTeam:= team;
 AddTeam:= team;
+ScriptCall('onNewTurn');
 end;
 
 procedure RecountAllTeamsHealth;