--- a/hedgewars/SDLh.pas Thu May 10 23:21:56 2012 +0200
+++ b/hedgewars/SDLh.pas Fri May 11 00:05:47 2012 +0200
@@ -969,7 +969,7 @@
{$ENDIF}
{* Compatibility between SDL-1.2 and SDL-1.3 *}
-procedure SDL_WarpMouse(x, y: Word); {$IFNDEF SDL13}cdecl; external SDLLibName;{$ENDIF}
+procedure SDL_WarpMouse(x, y: Word); {$IFDEF SDL13}inline{$ELSE}cdecl; external SDLLibName{$ENDIF};
function SDL_GetKeyState(numkeys: PLongInt): PByteArray; cdecl; external SDLLibName {$IFDEF SDL13} name 'SDL_GetKeyboardState'{$ENDIF};
function SDL_AllocFormat(format: LongWord): PSDL_PixelFormat; {$IFDEF SDL13}cdecl; external SDLLibName;{$ENDIF}
procedure SDL_FreeFormat(pixelformat: PSDL_PixelFormat); {$IFDEF SDL13}cdecl; external SDLLibName;{$ENDIF}
@@ -1055,12 +1055,12 @@
implementation
{$IFDEF SDL13}
-uses strings, uVariables;
+uses strings, uVariables, uStore;
// compatible functions
-procedure SDL_WarpMouse(x, y: Word);
+procedure SDL_WarpMouse(x, y: Word); inline;
begin
- SDL_WarpMouseInWindow(SDLwindow, x, y);
+ WarpMouse(x, y);
end;
function SDL_VideoDriverName(namebuf: PChar; maxlen: LongInt): PChar;
@@ -1077,6 +1077,7 @@
function SDL_EnableUNICODE(enable: LongInt): LongInt;
begin
+ enable:= enable; // avoid hint
SDL_StartTextInput();
SDL_EnableUNICODE:= 0;
end;