anchor.diff:      {ok, Req2} = cowboy_req:reply(204, Req),
       {ok, Req2, State};
   info({Ref, Msg}, Req, #state{ref=Ref, cf=CF}=State) ->
  -    {CT, V} = encode_body(proplists:get_value(type, Msg), CF, Msg),
  -    {ok, Req2} = cowboy_req:reply(200,
  -        [{<<"content-type">>, CT},
  -         {<<"x-lmq-queue-name">>, atom_to_binary(
  -            proplists:get_value(queue, Msg), latin1)},
  -         {<<"x-lmq-message-id">>, proplists:get_value(id, Msg)},
  -         {<<"x-lmq-message-type">>, atom_to_binary(
  -            proplists:get_value(type, Msg), latin1)}
  -        ], V, Req),
  +    {Hdrs, V} = encode_body(proplists:get_value(type, Msg), CF, Msg),
  +    Hdrs2 = Hdrs ++ [{<<"x-lmq-queue-name">>,
  +                      atom_to_binary(proplists:get_value(queue, Msg), latin1)},
  +                     {<<"x-lmq-message-id">>, proplists:get_value(id, Msg)},
  +                     {<<"x-lmq-message-type">>,
  +                      atom_to_binary(proplists:get_value(type, Msg), latin1)}],
  +    {ok, Req2} = cowboy_req:reply(200, Hdrs2, V, Req),
       {ok, Req2, State};
   info(_Msg, Req, State) ->
       {loop, Req, State}.
  
positive.code:     stringify_metadata(Tail, [{binary_to_list(K), binary_to_list(V)}|Acc]);
  stringify_metadata([], Acc) ->
      lists:reverse(Acc).
  
negative.code:      <<"\r\n--">>, Boundary, <<"--\r\n">>].
  
  encode_multipart_item({MD, V}) ->
      Hdrs = make_headers(MD),
      [[[Key, <<": ">>, Value, <<"\r\n">>] || {Key, Value} <- Hdrs],
       <<"content-transfer-encoding: binary\r\n">>,
       <<"\r\n">>, V].
  
  stringify_metadata(MD) ->
  