anchor.diff:      [] = keylist:fetch('route', Response2#response.header),
   
   
  +    %% check_valid_proxy_request(Method, Header)
  +    %%--------------------------------------------------------------------
  +    CVPR_Header = keylist:from_list([{"Proxy-Require", ["fooextension"]}]),
  +
  +    io:format("test: check_valid_proxy_request/2 - 1~n"),
  +    %% verify that we don't reject ACK even if there is a Proxy-Require in there
  +    true = check_valid_proxy_request("ACK", CVPR_Header),
  +
  +    io:format("test: check_valid_proxy_request/2 - 2~n"),
  +    %% verify that we don't reject CANCEL even if there is a Proxy-Require in there
  +    true = check_valid_proxy_request("CANCEL", CVPR_Header),
  +
  +    io:format("test: check_valid_proxy_request/2 - 3~n"),
  +    %% verify that we reject everything else that has a Proxy-Require (since we don't
  +    %% support any extensions)
  +    {siperror, 420, "Bad Extension", _EH} = (catch check_valid_proxy_request("OPTIONS", CVPR_Header)),
  +
  +
       %% check_proxy_request(Request)
       %%--------------------------------------------------------------------
       io:format("test: check_proxy_request/1 - 1~n"),
  
positive.code:     MyHostname = myhostname(),
      true = is_list(MyHostname),
  
      %% test that generate_branch gives us a RFC3261 branch
      io:format("test: generate_branch/0 - 1~n"),
      Branch = generate_branch(),
      "z9hG4bK-yxa-" = string:substr(Branch, 1, 12),
  
      %% test that our make_3261_token produces the expected results
      io:format("test: make_3261_token/1 - 1~n"),
      "abcdeXYZ-.!%*_+`'~123_" = make_3261_token("abcdeXYZ-.!%*_+`'~123@"),
  
negative.code:     case sipserver:get_env(myhostnames, []) of
  	[] ->
  	    siphost:myip();
  	[FirstHostname | _] when is_list(FirstHostname) ->
  	    FirstHostname
      end.
  
  %%--------------------------------------------------------------------
  