diff -r d59745e525ec -r 429b4637c8ad gameServer/EngineInteraction.hs --- a/gameServer/EngineInteraction.hs Thu Sep 29 17:25:25 2011 +0400 +++ b/gameServer/EngineInteraction.hs Thu Sep 29 20:11:27 2011 +0400 @@ -34,6 +34,5 @@ gameInfo2Replay :: GameInfo -> B.ByteString gameInfo2Replay GameInfo{roundMsgs = rm, teamsAtStart = teams, - params1 = giMapParams, - params2 = giParams} = do - + giMapParams = params1, + giParams = params2} = undefined