--- a/hedgewars/uKeys.pas	Mon Oct 11 16:56:00 2010 -0400
+++ b/hedgewars/uKeys.pas	Tue Oct 12 05:06:30 2010 +0200
@@ -355,6 +355,7 @@
 procedure SetBinds(var binds: TBinds);
 begin
 {$IFDEF IPHONEOS}
+    binds:= binds; // avoid hint
     CurrentBinds:= DefaultBinds;
 {$ELSE}
     CurrentBinds:= binds;