hedgewars/uGears.pas
branchphysfslayer
changeset 7928 88fde28bbda6
parent 7882 35dfc54ba2c6
child 7988 4b428183d946
--- a/hedgewars/uGears.pas	Sun Oct 21 01:28:33 2012 +0400
+++ b/hedgewars/uGears.pas	Sat Nov 03 00:34:35 2012 +0400
@@ -33,7 +33,7 @@
  *       effects are called "Visual Gears" and defined in the respective unit!
  *)
 interface
-uses SDLh, uConsts, uFloat, uTypes, uLandObjects;
+uses SDLh, uConsts, uFloat, uTypes;
 
 procedure initModule;
 procedure freeModule;
@@ -111,10 +111,12 @@
                 end
             else
                 dec(Gear^.Health, dmg);
-
+(*
+This doesn't fit well w/ the new loser sprite which is cringing from an attack.
             if (Gear^.Hedgehog^.Team = CurrentTeam) and (Gear^.Damage <> Gear^.Karma)
             and (not Gear^.Hedgehog^.King) and (Gear^.Hedgehog^.Effects[hePoisoned] = 0) and (not SuddenDeathDmg) then
                 Gear^.State:= Gear^.State or gstLoser;
+*)
 
             spawnHealthTagForHH(Gear, dmg);
 
@@ -1223,7 +1225,7 @@
 procedure chSkip(var s: shortstring);
 begin
 s:= s; // avoid compiler hint
-if not CurrentTeam^.ExtDriven then
+if not isExternalSource then
     SendIPC(_S',');
 uStats.Skipped;
 skipFlag:= true