diff -r 8fd1808b12ed -r db7743e2fad1 gameServer/CoreTypes.hs --- a/gameServer/CoreTypes.hs Wed Feb 24 22:37:03 2016 +0300 +++ b/gameServer/CoreTypes.hs Thu Feb 25 23:17:52 2016 +0300 @@ -93,6 +93,7 @@ | CheckFailed B.ByteString | CheckSuccess [B.ByteString] | Random [ClientChan] [B.ByteString] + | LoadGhost B.ByteString | QueryReplay B.ByteString | ShowReplay B.ByteString | Cleanup @@ -237,7 +238,7 @@ roomBansList :: ![B.ByteString], mapParams :: !(Map.Map B.ByteString B.ByteString), params :: !(Map.Map B.ByteString [B.ByteString]), - roomSaves :: !(Map.Map B.ByteString (Map.Map B.ByteString B.ByteString, Map.Map B.ByteString [B.ByteString])) + roomSaves :: !(Map.Map B.ByteString (B.ByteString, Map.Map B.ByteString B.ByteString, Map.Map B.ByteString [B.ByteString])) } newRoom :: RoomInfo