anchor.diff:  %%--------------------------------------------------------------------
   %% Function: auth([In])
   %%           In = string()
  -%% Descrip.: parse authrization header
  +%% Descrip.: Parse an authorization header.
   %% Returns : throw() | dict()
   %%--------------------------------------------------------------------
   auth([In]) when is_list(In) ->
  
positive.code: print_one_header_binary(_, _, []) ->
      [];
  print_one_header_binary(Key, Name, ValueList) ->
      %% certain headers that have multple values are written on a single line separated by "," -
      %% this is not because any RFC says so but because these are common headers that look
      %% considerably much better when appearing on one line
      OneLine =
  	if
  	    Key == accept ->		true;
  	    Key == allow ->		true;
  	    Key == 'allow-events' ->	true;
  	    Key == supported ->		true;
  	    Key == require ->		true;
  	    Key == 'proxy-require' ->	true;
  	    Key == 'rtp-rxstat' ->	true;	%% Cisco 79xx
  	    Key == 'rtp-txstat' ->	true;	%% Cisco 79xx
  	    true -> false
  	end,
      MakeBin = fun(V) ->                      list_to_binary(V)
                end,
      BinValueList = lists:map(MakeBin, ValueList),
      BinName = list_to_binary(Name),
      print_one_header_binary2(OneLine, BinName, BinValueList).
  
  print_one_header_binary2(true, BinName, BinValueList) ->
      %% return as one line
      OneLine = fun(Value, Acc) ->
  		      case Acc of
  
negative.code:     %% test commas inside <>!
  
  
      %% test via(ViaList)
      %%--------------------------------------------------------------------
      io:format("test: via/1 - 1~n"),
      [#via{proto="SIP/2.0/TLS", host="192.0.2.123", port=none, param=[]}] =
  