hedgewars/uGame.pas
branchwebgl
changeset 9521 8054d9d775fd
parent 9127 e350500c4edb
parent 9317 a04c30940d2d
child 9950 2759212a27de
--- a/hedgewars/uGame.pas	Fri Oct 11 11:55:31 2013 +0200
+++ b/hedgewars/uGame.pas	Fri Oct 11 17:43:13 2013 +0200
@@ -26,10 +26,9 @@
 ////////////////////
     implementation
 ////////////////////
-uses uInputHandler, uTeams, uIO, uAI, uGears, uSound,
-    uLocale, uCaptions,
-    uVisualGears, uTypes, uVariables, uCommands, uConsts
-    {$IFDEF USE_TOUCH_INTERFACE}, uTouch{$ENDIF};
+uses uInputHandler, uTeams, uIO, uAI, uGears, uSound, uLocale, uCaptions,
+     uTypes, uVariables, uCommands, uConsts, uVisualGearsList
+     {$IFDEF USE_TOUCH_INTERFACE}, uTouch{$ENDIF};
 
 procedure DoGameTick(Lag: LongInt);
 var i,j : LongInt;
@@ -91,7 +90,7 @@
         if CurrentHedgehog^.BotLevel <> 0 then
             ProcessBot;
         ProcessGears;
-        {$IFDEF SDL13}ProcessTouch;{$ENDIF}
+        {$IFDEF SDL2}ProcessTouch;{$ENDIF}
         end
     else
         begin