anchor.diff:  		{ok, Socket} ->
   		    Socket;
   		{'EXIT', Reason} ->
  -		    {error, Reason}
  +		    Msg = io_lib:format("sipsocket_tcp failed fetching TLS socket : ~p",
  +					[Reason]),
  +		    {error, lists:flatten(Msg)}
   		end;
   	{ok, true} ->
   	    {error, "TLS client disabled"}
  
positive.code: 	{ok, Socket} ->
  	    Socket;
  	{'EXIT', Reason} ->
              {error, Reason}
      end.
  
  %%--------------------------------------------------------------------
  
negative.code: 	{'EXIT', Reason} ->
  	    Msg = io_lib:format("sipsocket_tcp failed sending through pid ~p : ~p",
  				[SPid, Reason]),
  	    {error, lists:flatten(Msg)}
      end.
  
  %%--------------------------------------------------------------------
  