hedgewars/uTeams.pas
changeset 7628 bc7b1d228a2c
parent 7442 9bb6abdb5675
child 7669 a85e1c167b69
--- a/hedgewars/uTeams.pas	Thu Aug 30 12:47:41 2012 -0400
+++ b/hedgewars/uTeams.pas	Thu Aug 30 13:02:19 2012 -0400
@@ -473,7 +473,7 @@
                 begin
                 Gear^.Invulnerable:= false;
                 Gear^.Damage:= Gear^.Health;
-                Gear^.State:= (Gear^.State or gstHHGone) and not gstHHDriven
+                Gear^.State:= (Gear^.State or gstHHGone) and (not gstHHDriven)
                 end
             end
 end;
@@ -531,7 +531,7 @@
     AddTeam(Color);
     CurrentTeam^.TeamName:= ts;
     CurrentTeam^.PlayerHash:= s;
-    if GameType in [gmtDemo, gmtSave] then
+    if GameType in [gmtDemo, gmtSave, gmtRecord] then
         CurrentTeam^.ExtDriven:= true;
 
     CurrentTeam^.voicepack:= AskForVoicepack('Default')