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: %% External exports
  %%--------------------------------------------------------------------
  -export([
  	 expire/1,
  	 to/1,
  	 from/1,
  	 contact/1,
  
negative.code: print_one_header_binary(_, _, []) ->
      [];
  print_one_header_binary(Key, Name, ValueList) ->
      %% certain headers that have multiple 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,
      BinName = list_to_binary(Name),
      print_one_header_binary2(OneLine, BinName, ValueList, []).
  
  %% print_one_header_binary2 - convert all the values to binarys
  print_one_header_binary2(OneLine, BinName, [H | T], Res) ->
      print_one_header_binary2(OneLine, BinName, T, [list_to_binary(H) | Res]);
  print_one_header_binary2(OneLine, BinName, [], Res) ->
      print_one_header_binary3(OneLine, BinName, lists:reverse(Res)).
      
  %% print_one_header_binary3 - create the binary representation of this header
  %% and all it's values
  print_one_header_binary3(true, BinName, BinValueList) ->
      %% return as one line
      OneLine = fun(Value, Acc) ->
  		      case Acc of
  