--- a/hedgewars/uGame.pas	Sat Nov 12 18:02:55 2011 +0100
+++ b/hedgewars/uGame.pas	Sat Nov 12 18:38:21 2011 +0100
@@ -26,7 +26,7 @@
 ////////////////////
    implementation
 ////////////////////
-uses uKeys, uTeams, uIO, uAI, uGears, uSound, uMobile, uVisualGears, uTypes, uVariables, uTouch;
+uses uKeys, uTeams, uIO, uAI, uGears, uSound, uMobile, uVisualGears, uTypes, uVariables{$IFDEF SDL13}, uTouch{$ENDIF};
 
 procedure DoGameTick(Lag: LongInt);
 var i: LongInt;
@@ -53,7 +53,7 @@
        begin
        if CurrentHedgehog^.BotLevel <> 0 then ProcessBot;
        ProcessGears;
-       ProcessTouch;
+       {$IFDEF SDL13}ProcessTouch;{$ENDIF}
        end else
        begin
        NetGetNextCmd;