anchor.diff:              [{Service, Name} | _Rest] = List2,
   
               Dest2 = service_dest(Service),
  -            resolve_dest_srv(Name, Dest2)
  +            resolve_dest_srv(Host, Name, Dest2)
       end.
   
   %% @doc Create `#sip_destination{}' for given NAPTR service
  
positive.code:     List = lists:sort(inet_res:lookup(Host, in, naptr)),
      case List of
          [] ->
              % no NAPTR records -- try making SRV queries
              if TLS -> Params = [tls]; not TLS -> Params = [] end,
              DomainTCP = service_proto(tcp, TLS) ++ Host,
              DestTCP = #sip_destination{transport = tcp, params = Params},
              case resolve_dest_srv(DomainTCP, DestTCP) of
                  [] ->
                      DomainUDP = service_proto(udp, TLS) ++ Host,
                      DestUDP = #sip_destination{transport = udp, params = Params},
                      resolve_dest_srv(DomainUDP, DestUDP);
                  Dests -> Dests
              end;
          _ ->
  
negative.code:             % Transport is provided explicitly, make SRV query
              Domain = service_proto(Transport, TLS) ++ Target,
              Dest = #sip_destination{transport = Transport, params = Params},
              resolve_dest_srv(Target, Domain, Dest);
          true ->
              % make NAPTR query
              select_bynaptr(Target, TLS)
  