--- a/hedgewars/uInputHandler.pas Thu May 17 20:01:56 2012 +0200
+++ b/hedgewars/uInputHandler.pas Thu May 17 20:19:35 2012 +0200
@@ -26,7 +26,6 @@
procedure freeModule;
function KeyNameToCode(name: shortstring): word;
-procedure ProcessKbd;
procedure ProcessMouse(event: TSDL_MouseButtonEvent; ButtonDown: boolean);
procedure ProcessKey(event: TSDL_KeyboardEvent); inline;
procedure ProcessKey(code: LongInt; KeyDown: boolean);
@@ -60,16 +59,6 @@
KeyNameToCode:= code;
end;
-procedure ProcessKbd;
-//var i, j, k: LongInt;
-begin
-
-// move cursor/camera
-// TODO: Scale on screen dimensions and/or axis value (game controller)?
-//TODO what is this for?
-movecursor(5 * CursorMovementX, 5 * CursorMovementY);
-end;
-
procedure ProcessKey(code: LongInt; KeyDown: boolean);
var
Trusted: boolean;