150         clientClan :: !(Maybe B.ByteString),

   150         clientClan :: !(Maybe B.ByteString),

   151         checkInfo :: !(Maybe CheckInfo),

   151         checkInfo :: !(Maybe CheckInfo),

   152         eiLobbyChat,

   152         eiLobbyChat,

   153         eiEM,

   153         eiEM,

   154         eiJoin :: !EventsInfo,

   154         eiJoin :: !EventsInfo,

   156     }

   157     }

   157 

   158 

   158 instance Eq ClientInfo where

   159 instance Eq ClientInfo where

   159     (==) = (==) `on` clientSocket

   160     (==) = (==) `on` clientSocket

   160 

   161