hedgewars/uGame.pas
changeset 3904 22e4d74240e5
parent 3902 3aac7ca07b0e
child 3928 2560731c860d
--- a/hedgewars/uGame.pas	Sat Sep 25 18:38:05 2010 +0200
+++ b/hedgewars/uGame.pas	Sun Sep 26 03:41:08 2010 +0200
@@ -26,7 +26,7 @@
 ////////////////////
    implementation
 ////////////////////
-uses uMisc, uConsts, uKeys, uTeams, uIO, uAI, uGears, uScript, uSound;
+uses uMisc, uConsts, uKeys, uTeams, uIO, uAI, uGears, uScript, uSound, SDLh;
 
 procedure DoGameTick(Lag: LongInt);
 var i: LongInt;
@@ -68,6 +68,9 @@
                         if isSoundEnabled then playMusic;
                         GameType:= gmtLocal;
                         InitIPC;
+{$IFDEF IPHONEOS}
+                        replayFinished();
+{$ENDIF}
                         end;
                end
           else ProcessGears