diff -r f185e7367dd3 -r bf92592915c6 gameServer/CoreTypes.hs --- a/gameServer/CoreTypes.hs Thu Sep 29 16:30:02 2022 +0200 +++ b/gameServer/CoreTypes.hs Wed Oct 05 22:39:07 2022 +0300 @@ -127,6 +127,8 @@ details :: Maybe GameDetails } +data AllowMsgState = AllowAll | AllowRegistered | AllowNone + data ClientInfo = ClientInfo { @@ -152,6 +154,7 @@ isKickedFromServer :: !Bool, isJoinedMidGame :: !Bool, hasAskedList :: !Bool, + allowMsgState :: !AllowMsgState, clientClan :: !(Maybe B.ByteString), checkInfo :: !(Maybe CheckInfo), eiLobbyChat,