--- a/hedgewars/hwengine.pas Mon Apr 25 02:25:25 2011 +0200
+++ b/hedgewars/hwengine.pas Mon Apr 25 06:38:59 2011 +0200
@@ -30,7 +30,7 @@
{$ENDIF}
uses SDLh, uMisc, uConsole, uGame, uConsts, uLand, uAmmos, uVisualGears, uGears, uStore, uWorld, uKeys, uSound,
- uScript, uTeams, uStats, uIO, uLocale, uChat, uAI, uAIMisc, uRandom, uLandTexture, uCollisions, uMobile,
+ uScript, uTeams, uStats, uIO, uLocale, uChat, uAI, uAIMisc, uRandom, uLandTexture, uCollisions,
sysutils, uTypes, uVariables, uCommands, uUtils, uCaptions, uDebug, uCommandHandlers, uLandPainted;
{$IFDEF HWLIBRARY}
@@ -256,10 +256,9 @@
ShowMainWindow();
{$ENDIF}
- AddProgress();
-
ControllerInit(); // has to happen before InitKbdKeyTable to map keys
InitKbdKeyTable();
+ AddProgress();
LoadLocale(Pathz[ptLocale] + '/en.txt'); // Do an initial load with english
if (Length(cLocaleFName) > 6) then cLocale := Copy(cLocaleFName,1,5)
@@ -281,10 +280,7 @@
SendIPCAndWaitReply('C'); // ask for game config
end
else
- begin
LoadRecordFromFile(recordFileName);
- uMobile.SaveBeganSynching();
- end;
ScriptOnGameInit;