hedgewars/hwengine.pas
changeset 8350 14b938faec69
parent 8345 9d9b498cfb03
parent 8346 3443e0de2c9d
child 8354 c25bee85d6f8
--- a/hedgewars/hwengine.pas	Sun Dec 30 16:04:28 2012 +0200
+++ b/hedgewars/hwengine.pas	Mon Dec 31 12:12:23 2012 +0200
@@ -264,6 +264,9 @@
             end; //end case event.type_ of
         end; //end while SDL_PollEvent(@event) <> 0 do
 
+        if (CursorMovementX <> 0) or (CursorMovementY <> 0) then
+            handlePositionUpdate(CursorMovementX * cameraKeyboardSpeed, CursorMovementY * cameraKeyboardSpeed);
+
         if (cScreenResizeDelay <> 0) and (cScreenResizeDelay < RealTicks) and
            ((cNewScreenWidth <> cScreenWidth) or (cNewScreenHeight <> cScreenHeight)) then
         begin