anchor.diff:  %%                                  {stop, Reason, State}
   %% @end
   %%--------------------------------------------------------------------
  +handle_cast({send, Data},  St) ->
  +    ?debug("~p:handle_call(send): Sending: ~p", 
  +	     [ ?MODULE, Data]),
  +
  +    gen_tcp:send(St#st.sock, term_to_binary(Data)),
  +    {noreply, St};
  +
   handle_cast(_Msg, State) ->
       ?warning("~p:handle_cast(): Unknown call: ~p", [ ?MODULE, _Msg]),
       {noreply, State}.
  
positive.code: %%                                   {stop, Reason, State}
  %% @end
  %%--------------------------------------------------------------------
  handle_call({send, Data}, _From,  St) ->
      ?debug("~p:handle_call(send): Sending: ~p", 
  	     [ ?MODULE, Data]),
  
      {reply, gen_tcp:send(St#st.sock, term_to_binary(Data)), St};
  
  
  handle_call(terminate_connection, _From,  St) ->
  
negative.code:     end.
  
  send(Pid, Data) when is_pid(Pid) ->
      gen_server:cast(Pid, {send, Data}).
      
  send(IP, Port, Data) ->
      case connection_manager:find_connection_by_address(IP, Port) of
  	{ok, Pid} ->
  	    gen_server:cast(Pid, {send, Data});
  
  	_Err -> 
  	    ?info("connection:send(): Connection ~p:~p not found for data: ~p", 
  