anchor.diff:    when is_record(Socket, sipsocket); Socket == none, is_record(Response, response) ->
       case sipheader:via(Response#response.header) of
   	[_Self] ->
  -	    logger:log(error,
  -		       "Can't proxy response ~p ~s because it contains just one or less Via and that should be mine!",
  -		       [Response#response.status, Response#response.reason]),
  +	    logger:log(error, "Can't proxy response ~p ~s because it contains just one or less Via and that "
  +		       "should be mine!", [Response#response.status, Response#response.reason]),
   	    {error, invalid_Via};
   	[_Self | Via] ->
  -	    %% Remove Via matching me (XXX should check that it does)
  +	    %% Remove Via matching me (XXX should check that it does match me)
   	    NewHeader = keylist:set("Via", sipheader:via_print(Via), Response#response.header),
  -	    %% Now look for the correct "server transaction" to use when sending this response upstreams
  -	    [_NextVia | _] = Via,
   	    NewResponse = Response#response{header=NewHeader},
   	    send_response(Socket, NewResponse)
       end.
  
positive.code: %%--------------------------------------------------------------------
  %% Function: send_proxy_request(Socket, Request, Dst, ViaParameters)
  %%           Socket        = sipsocket record() | none, socket to use
  %%                           for sending this request 
  %%           Request       = request record()
  %%           Dst           = sipdst record()
  %%           ViaParameters = list() of {key, value} tuple()
  
negative.code: 	 send_proxy_response/2,
  	 send_result/5,
  	 send_result/6,
  	 stateless_proxy_request/2,
  
  	 test/0
  	]).
  
  %% exports only intended for use by siprequest module
  