anchor.diff:          tl(Body) ++ [http_eob]),
       ?assertEqual({200, "OK"}, status(Response1)),
       ?assertEqual(<<?DEFAULT_STRING>>, body(Response1)),
  -    ?assertEqual(<<"This is chunky stuff!">>,
  +    ?assertEqual("This is chunky stuff!",
           lhttpc_lib:header_value("x-test-orig-body", headers(Response1))),
       % Make sure it works with no body part in the original request as well
       {ok, UploadState2} = lhttpc:request(URL, post, Hdrs, [], 1000, Options),
  
positive.code:         Body ++ [http_eob]),
      ?assertEqual({200, "OK"}, status(Response2)),
      ?assertEqual(<<?DEFAULT_STRING>>, body(Response2)),
      ?assertEqual(<<"This is chunky stuff!">>,
          lhttpc_lib:header_value("x-test-orig-body", headers(Response2))).
  
  partial_upload_chunked() ->
  
negative.code: 
  chunked_upload(Module, Socket, _, Headers, <<>>) ->
      TransferEncoding = lhttpc_lib:header_value("transfer-encoding", Headers),
      {Body, HeadersAndTrailers} =
  		webserver:read_chunked(Module, Socket, Headers),
      Trailer1 = lhttpc_lib:header_value("x-trailer-1", HeadersAndTrailers),
      Module:send(
          Socket,
  