hedgewars/uGearsHedgehog.pas
changeset 9473 a51a69094c24
parent 9291 15f7bb217b66
child 9477 0463f747e839
--- a/hedgewars/uGearsHedgehog.pas	Fri Sep 27 21:52:21 2013 -0400
+++ b/hedgewars/uGearsHedgehog.pas	Sun Sep 29 16:10:32 2013 -0400
@@ -828,6 +828,7 @@
 var isFalling, isUnderwater: boolean;
     land: Word;
 begin
+WorldWrap(Gear);
 land:= 0;
 isUnderwater:= cWaterLine < hwRound(Gear^.Y) + Gear^.Radius;
 if Gear^.dX.QWordValue > 8160437862 then