hedgewars/hwengine.pas
changeset 8346 3443e0de2c9d
parent 8327 a6f3452f5f94
child 8350 14b938faec69
--- a/hedgewars/hwengine.pas	Fri Dec 28 23:54:42 2012 +0100
+++ b/hedgewars/hwengine.pas	Sat Dec 29 22:50:10 2012 +0100
@@ -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