hedgewars/uGearsHedgehog.pas
changeset 9917 1ca194a8b509
parent 9914 ba26595503ab
child 9950 2759212a27de
child 9971 071902835770
--- a/hedgewars/uGearsHedgehog.pas	Thu Jan 02 23:52:34 2014 -0500
+++ b/hedgewars/uGearsHedgehog.pas	Fri Jan 03 00:31:07 2014 -0500
@@ -1061,7 +1061,6 @@
         Gear^.State:= Gear^.State and not gstCollision 
         end;
 
-    CheckGearDrowning(Gear);
     // could become nil if ai's hog fails to respawn in ai survival
     if Gear = nil then exit;
     // hide target cursor if current hog is drowning
@@ -1340,6 +1339,8 @@
 procedure doStepHedgehog(Gear: PGear);
 var tX: hwFloat;
 begin
+CheckGearDrowning(Gear);
+if Gear = nil then exit;
 tX:= Gear^.X;
 if WorldWrap(Gear) then
     begin