anchor.diff:      %% Check that the Record-Route was deleted
       [] = keylist:fetch('record-route', AHeader1),
   
  +    io:format("test: make_answerheader/1 - 3~n"),
  +    %% Test without a Record-Route header
  +    AHeader2 = keylist:delete('record-route', ReqHeader),
  +    AHeader2 = make_answerheader(AHeader2),
  +
   
       %% get_loop_cookie(ReqHeader, URI, Proto
       %%--------------------------------------------------------------------
  
positive.code: %%           error
  %%           Branch = string()
  %%--------------------------------------------------------------------
  stateless_generate_branch(OrigURI, Header) ->
      case sipheader:topvia(Header) of
  	TopVia when is_record(TopVia, via) ->
  	    case sipheader:get_via_branch(TopVia) of
  		"z9hG4bK" ++ RestOfBranch ->
  		    %% The previous hop has put a RFC3261 branch in it's Via. Use that,
  		    %% togehter with our nodename as branch.
  		    In = lists:concat([node(), "-rbranch-", RestOfBranch]),
  		    {ok, "z9hG4bK-yxa-" ++ make_base64_md5_token(In)};
  		_ ->
  		    %% No branch, or non-RFC3261 branch
  		    OrigURIstr = sipurl:print(OrigURI),
  		    FromTag = sipheader:get_tag(keylist:fetch('from', Header)),
  		    ToTag = sipheader:get_tag(keylist:fetch('to', Header)),
  		    CallId = keylist:fetch('call-id', Header),
  		    {CSeqNum, _} = sipheader:cseq(keylist:fetch('cseq', Header)),
  		    In = lists:concat([node(), "-uri-", OrigURIstr, "-ftag-", FromTag, "-totag-", ToTag,
  				       "-callid-", CallId, "-cseqnum-", CSeqNum]),
  		    {ok, "z9hG4bK-yxa-" ++ make_base64_md5_token(In)}
  	    end;
  
negative.code:     end.
  
  %%--------------------------------------------------------------------
  %% Function: stateless_generate_branch(OrigURI, Header, Node)
  %%           OrigURI = sipurl record(), the original requests URI
  %%           Header  = keylist record()
  %%           Node    = atom(), name of node (to make this code
  %%                                           testable)
  %% Descrip.: Generate a branch suitable for stateless proxying of a
  %%           request (meaning that we make sure that we generate the
  %%           very same branch for a retransmission of the very same
  