anchor.diff:  
   %% returns [ Header1, Header2 .....]
   reformat_header(H) ->
  +    FormatFun = fun(Hname, Str) ->
  +                        lists:flatten(io_lib:format("~s: ~s",[Hname, Str]))
  +                end,
  +    reformat_header(H, FormatFun).
  +reformat_header(H, FormatFun) ->
       lists:zf(fun({Hname, Str}) ->
  -                     I =  lists:flatten(io_lib:format("~s: ~s",[Hname, Str])),
  +                     I =  FormatFun(Hname, Str),
                        {true, I};
                   (undefined) ->
                        false
  
positive.code:             ) ++
          lists:map(
            fun({http_header,_,K,_,V}) ->
                    lists:flatten(io_lib:format("~s: ~s",[K,V]))
            end, H#headers.other).
  
  
  
negative.code:          embedded_start_conf/1, embedded_start_conf/2,
           embedded_start_conf/3, embedded_start_conf/4]).
  
  -export([set_status_code/1, reformat_header/1, reformat_header/2,
           reformat_request/1, reformat_response/1, reformat_url/1]).
  
  -export([set_trace/1,
  