hedgewars/uCursor.pas
branchflibqtfrontend
changeset 8222 d3dc08500fc0
parent 6580 6155187bf599
child 8330 aaefa587e277
child 8346 3443e0de2c9d
--- a/hedgewars/uCursor.pas	Tue Dec 04 10:17:16 2012 +0100
+++ b/hedgewars/uCursor.pas	Wed Dec 05 18:12:07 2012 +0100
@@ -3,6 +3,7 @@
 interface
 
 procedure init;
+procedure resetPosition;
 procedure updatePosition;
 
 implementation
@@ -11,6 +12,11 @@
 
 procedure init;
 begin
+    resetPosition();
+end;
+
+procedure resetPosition;
+begin
     SDL_WarpMouse(cScreenWidth div 2, cScreenHeight div 2);
 end;