anchor.diff:  %% </ul>
   -spec on_message(Callback::fun()) -> any().
   on_message(Callback) ->
  -  gen_fsm:send_all_state_event(wsecli, {on_message, Callback}).
  +  on_message(?DEFAULT_REG_NAME, Callback).
  +
  +%% @doc Add a callback to be called when a message arrives
  +%%
  +%% The callback function must be a function which takes two parameters:
  +%% <ul>
  +%% <li> The first is an atom with values binary or text depending on the type of the websocket message</li>
  +%% <li> The second parameter is the message payload</li>
  +%% </ul>
  +-spec on_message(Socket::atom()|pid(), Callback::fun()) -> any().
  +on_message(Socket, Callback) ->
  +  gen_fsm:send_all_state_event(Socket, {on_message, Callback}).
   
   %% @doc Add a callback to be called when then connection was closed
   %%
  
positive.code: %% The callback function must be a function which takes no parameters
  -spec on_open(Callback::fun()) -> any().
  on_open(Callback) ->
    gen_fsm:send_event(wsecli, {on_open, Callback}).
  
  %% @doc Add a callback to be called when an error occurs
  %%
  
negative.code: %%the error
  -spec on_error(Callback::fun()) -> any().
  on_error(Callback) ->
    on_error(?DEFAULT_REG_NAME, Callback).
  
  %% @doc Add a callback to be called when an error occurs
  %%
  %% The callback function must be a function which takes one parameter, the reason for
  %%the error
  -spec on_error(Socket::pid()|atom(), Callback::fun()) -> any().
  on_error(Socket, Callback) ->
    gen_fsm:send_all_state_event(Socket, {on_error, Callback}).
  
  %% @doc Add a callback to be called when a message arrives
  %%
  