--- a/hedgewars/uKeys.pas Thu Jun 03 18:31:56 2010 +0000
+++ b/hedgewars/uKeys.pas Thu Jun 03 23:02:35 2010 +0000
@@ -61,7 +61,7 @@
DefaultBinds, CurrentBinds: TBinds;
coeff: LongInt;
-{$IFDEF IPHONEOS}
+{$IFDEF HWLIBRARY}
leftClick: boolean;
middleClick: boolean;
rightClick: boolean;
@@ -86,9 +86,10 @@
cursorDown: boolean;
cursorLeft: boolean;
cursorRight: boolean;
-
+{$IFDEF IPHONEOS}
procedure setiPhoneBinds;
{$ENDIF}
+{$ENDIF}
implementation
uses uTeams, uConsole, uMisc;
//const KeyNumber = 1024;
@@ -509,7 +510,7 @@
wheelUp:= false;
wheelDown:= false;
coeff:= 5;
-{$IFDEF IPHONEOS}
+{$IFDEF HWLIBRARY}
// this function is called by HW_allKeysUp so be careful
// mouse emulation