anchor.diff:      PlaceHolderVia = sipheader:via_print([V]),
       AnswerHeader3 = keylist:prepend({"Via", PlaceHolderVia}, AnswerHeader1),
       %% If there is no body, remove the Content-Type we copied above
  -    BodyLen = if
  -		  is_binary(Body) -> size(Body);
  -		  is_list(Body) -> length(Body)
  -	      end,
  -    AnswerHeader4 = case BodyLen of
  +    AnswerHeader4 = case size(Body) of
   			0 -> keylist:delete('content-type', AnswerHeader3);
   			_ -> AnswerHeader3
   		    end,
  
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: %%           Branch      = string()
  %%           Parameters  = list() of string()
  %%           ParamDict   = dict()
  %% Descrip.: If LoopCookie is not 'none', add it to Branch. Return
  %%           a new Parameters construct.
  %% Returns : NewParameters, list() of string()
  %%--------------------------------------------------------------------
  add_loopcookie_to_branch(none, _Branch, Parameters, _ParamDict) ->
      %% Request has a branch, and loop detection is off
      Parameters;
  add_loopcookie_to_branch(LoopCookie, Branch, _Parameters, ParamDict) ->
      NewBranch = lists:concat([Branch, "-o", LoopCookie]),
      Param2 = dict:store("branch", NewBranch, ParamDict),
      sipheader:dict_to_param(Param2).
  
  
  %%--------------------------------------------------------------------
  %% Function: add_stateless_generated_branch(Header, OrigURI,
  