hedgewars/uKeys.pas
changeset 2163 12730f5e79b9
parent 2162 2bce91404d49
child 2171 8208946331ba
--- a/hedgewars/uKeys.pas	Sat Jun 13 15:39:26 2009 +0000
+++ b/hedgewars/uKeys.pas	Sun Jun 14 13:20:28 2009 +0000
@@ -67,7 +67,12 @@
 {$ELSE}
 pkbd:= SDL_GetKeyState(nil);
 {$ENDIF}
-i:= SDL_GetMouseState(nil, nil);
+{$IFDEF IPHONEOS}
+//SDL_GetMouseState currently broken in sdl13
+i:=1;
+{$ELSE}
+i:=SDL_GetMouseState(nil, nil);
+{$ENDIF}
 pkbd^[1]:= (i and 1);
 pkbd^[2]:= ((i shr 1) and 1);
 {$IFDEF DARWIN}