anchor.diff:  		      end
   	      end, Locations).
   
  +debugfriendly_locations([]) ->
  +    [];
  +debugfriendly_locations([Location | Rest]) ->
  +    [Prio] = get_prioritys([Location]),
  +    {Contact, _, _, Expire} = Location,
  +    % make sure we don't end up with a negative Expires
  +    NewExpire = lists:max([0, Expire - util:timestamp()]),
  +    [C] = sipheader:contact_print([{none, Contact}]),
  +    Res = "priority " ++ Prio ++ ": " ++ C ++ ";expires=" ++ integer_to_list(NewExpire),
  +    lists:append([Res], debugfriendly_locations(Rest)).
  +    
   lookupdefault(URL) ->
       {User, Pass, Host, Port, Parameters} = URL,
       case homedomain(Host) of
  
positive.code: 	    logger:log(debug, "Lookup: Address lookup of ~p -> ~p", [Key, Loc]),
  	    Loc;
  	{atomic, Locations} ->
  	    BestLocations = prioritize_locations(Locations),
  	    logger:log(debug, "Lookup: Best location(s) of ~p :~n~p", [Key, BestLocations]),
  	    % check if more than one location was found.
  	    case BestLocations of
  	        [] ->
  
negative.code: 	    false
      end.
  
  homedomain(Domain) ->
      case util:casegrep(Domain, sipserver:get_env(homedomain, [])) of
  	true ->
  	    true;
  	_ ->
  	    HostnameList = lists:append(sipserver:get_env(myhostnames, []), [siphost:myip()]),
  	    util:casegrep(Domain, HostnameList)
      end.
  
  get_remote_party_number(Key, URI, DstHost) ->
      {_, _, Host, _, _} = URI,
  