14 lines
362 B
Diff
14 lines
362 B
Diff
--- a/hedgewars/uWorld.pas
|
|
+++ b/hedgewars/uWorld.pas
|
|
@@ -1168,8 +1168,8 @@ procedure RenderAttackBar();
|
|
procedure ShiftWorld(Dir: LongInt); inline;
|
|
begin
|
|
preShiftWorldDx:= WorldDx;
|
|
- WorldDx:= WorldDx + LongInt(Dir * LongInt(playWidth));
|
|
-
|
|
+ Dir := Dir * LongInt(playWidth);
|
|
+ WorldDx:= WorldDx + Dir;
|
|
end;
|
|
|
|
procedure UnshiftWorld(); inline;
|