hedgewars/uWorld.pas
changeset 11151 5c40c65b619d
parent 11046 47a8c19ecb60
parent 11090 874e477700d5
child 11156 efea685933ae
--- a/hedgewars/uWorld.pas	Thu Sep 10 04:59:02 2015 +0200
+++ b/hedgewars/uWorld.pas	Thu Sep 10 18:22:52 2015 +0200
@@ -1148,7 +1148,7 @@
 procedure ShiftWorld(Dir: LongInt); inline;
 begin
     preShiftWorldDx:= WorldDx;
-    WorldDx:= WorldDx + Dir * LongInt(playWidth);
+    WorldDx:= WorldDx + LongInt(Dir * LongInt(playWidth));
 
 end;