diff -r 0655bb13af01 -r c8deca7b1e3c hedgewars/uTeams.pas
--- a/hedgewars/uTeams.pas	Wed Jan 14 21:59:11 2009 +0000
+++ b/hedgewars/uTeams.pas	Wed Jan 14 22:53:22 2009 +0000
@@ -80,6 +80,7 @@
 			end;
 
 var CurrentTeam: PTeam = nil;
+	PreviousTeam: PTeam = nil;
 	CurrentHedgehog: PHedgehog = nil;
 	TeamsArray: array[0..Pred(cMaxTeams)] of PTeam;
 	TeamsCount: Longword = 0;
@@ -155,6 +156,7 @@
 FreeActionsList;
 TargetPoint.X:= NoPointX;
 TryDo(CurrentTeam <> nil, 'nil Team', true);
+PreviousTeam:= CurrentTeam;
 
 with CurrentHedgehog^ do
 	if Gear <> nil then