--- a/gameServer/CoreTypes.hs	Mon Jul 01 22:28:42 2013 +0300
+++ b/gameServer/CoreTypes.hs	Mon Jul 01 23:23:22 2013 +0300
@@ -144,6 +144,7 @@
     GameInfo
     {
         roundMsgs :: [B.ByteString],
+        lastFilteredTimedMsg :: Maybe B.ByteString,
         leftTeams :: [B.ByteString],
         teamsAtStart :: [TeamInfo],
         teamsInGameNumber :: Int,
@@ -161,6 +162,7 @@
 newGameInfo =
     GameInfo
         []
+        Nothing
         []
 
 data RoomInfo =