Simple implementation of websocket chat in Erlang