anchor.diff:  %%           Proto       = ???
   %% Descrip.: Generate a Via header for this proxy and add it to Header
   %% Returns : NewHeader, keylist record()
  +%%
  +%% XXX rework to only calculate LoopCookie if we are actually going to
  +%% use it.
   %%--------------------------------------------------------------------
   proxy_add_via(Header, OrigURI, Parameters, Proto) ->
       LoopCookie = case sipserver:get_env(detect_loops, true) of
  
positive.code:     io:format("test: make_response/7 - 2.6.2~n"),
      [] = keylist:fetch('route', Response2#response.header),
  
      %% check_proxy_request(Request)
      %%--------------------------------------------------------------------
  
      io:format("test: check_proxy_request/1 - 1~n"),
      ReqHeader2 = keylist:set("Content-Length", ["900"], ReqHeader),
      Req2 = #request{method="MESSAGE", uri=sipurl:parse("sip:test@example.org"), header=ReqHeader2, body = <<"foo">>},
  
negative.code:     %% Check that the Record-Route was deleted
      [] = keylist:fetch('record-route', AHeader1),
  
  
      %% get_loop_cookie(ReqHeader, URI, Proto
      %%--------------------------------------------------------------------
      io:format("test: get_loop_cookie/3 - 1~n"),
      "JYJPsr4IqjymexLGUB58yg" = get_loop_cookie(ReqHeader, sipurl:parse("sip:test@example.org"), tcp),
  
  
  
      %% make_response(Status, Reason, Body, ExtraHeaders, Parameters,
      %%		     Proto, Request)
      %%--------------------------------------------------------------------
      io:format("test: make_response/7 - 1.1~n"),
      Response1 = make_response(100, "Trying", "test", [], [], tcp, #request{header=ReqHeader}),
  
  