anchor.diff:      SixxxResponses = get_xx_responses(600, Responses),
       if
   	SixxxResponses /= [] ->
  -	    aggregate_authreqs(lists:nth(1, SixxxResponses), Responses);
  +	    pick_response(6, SixxxResponses);
   	TwoxxResponses /= [] ->
  -	    aggregate_authreqs(lists:nth(1, TwoxxResponses), Responses);
  +	    pick_response(2, TwoxxResponses);
   	ThreexxResponses /= [] ->
  -	    aggregate_authreqs(lists:nth(1, ThreexxResponses), Responses);
  +	    pick_response(3, ThreexxResponses);
   	FourxxResponses /= [] ->
  -	    BestFourxx = prefer_response([407, 401, 415, 420, 484], FourxxResponses),
  +	    BestFourxx = pick_response(4, FourxxResponses),
   	    aggregate_authreqs(BestFourxx, Responses);
   	FivexxResponses /= [] ->
  -	    % XXX RFC 3261 says we SHOULD avoid 503 Service Unavailable!
  -	    aggregate_authreqs(lists:nth(1, FivexxResponses), Responses);
  +	    pick_response(5, FivexxResponses);
   	true ->
   	    logger:log(debug, "Appserver: No response to my liking"),
   	    none
  
positive.code:     case Status of
  	407 ->
  	    ProxyAuth = collect_auth_headers(Status, "Proxy-Authenticate", Responses),
  	    logger:log(normal, "Aggregating ~p Proxy-Authenticate headers into response ~p ~s",
  			[length(ProxyAuth), Status, Reason]),
  	    logger:log(normal, "FREDRIK: PROXY AUTH :~n~p", [ProxyAuth]),
  	    NewHeader = keylist:set("Proxy-Authenticate", ProxyAuth, Header),
  	    {Status, Reason, NewHeader, Body};
  	401 ->
  	    WWWAuth = collect_auth_headers(Status, "WWW-Authenticate", Responses),
  	    logger:log(normal, "Aggregating ~p WWW-Authenticate headers into response ~p ~s",
  			[length(WWWAuth), Status, Reason]),
  	    NewHeader = keylist:set("WWW-Authenticate", WWWAuth, Header),
  	    {Status, Reason, NewHeader, Body};
  	_ ->
  
negative.code: 	    Parent = NewState#state.parent,
  	    logger:log(debug, "sipproxy: Forwarding response ~p ~s (in response to ~s ~s) to my parent (PID ~p) immediately",
  	    		[Status, Reason, Method, sipurl:print(URI), Parent]),
  	    %% RFC 3261 16.7 bullet 5 (Check response for forwarding) says we MUST process any
  	    %% response chosen for immediate forwarding as described in
  	    %% "Aggregate Authorization Header Field Values" through "Record-Route".
  	    %% This makes sense if it is an 401 or an 407 that forward_immediately() tells us
  	    %% to forward immediately - otherwise this is a no-op.
  	    Targets = NewState#state.targets,
  	    Responses = targetlist:get_responses(Targets),
  	    FwdResponse = aggregate_authreqs(Response, Responses),
  