You can clone with
Server.hs: <socket: 9>: hGetLine: end of file
It should be some System message actually.
You cannot send system message via disconnected socket.
It could be a message that will be send to all clients when one client leave. Same shit with join-message.
So what the disconnected socket are you talking about?
Then this should be titled "Send broadcast messages on connect/disconnect events." otherwise title is ambiguous.
Seems to be done in 70c8426.