anchor.diff:      Length = filelib:file_size(Filename),
       send_response_bodyfun({file, Length, Filename}, Code, Parts, ReqData, LogData);
   send_response_bodyfun({file, Length, Filename}, Code, all, ReqData, LogData) ->
  -    Writer = fun() -> send_file_body(ReqData#wm_reqdata.socket, Length, Filename) end,
  +    Writer = fun() -> send_file_body(ReqData#wm_reqdata.socket, false, Length, Filename) end,
       send_response_headers(Code, Length, undefined, Writer, ReqData, LogData);
   send_response_bodyfun({file, _Length, Filename}, Code, Parts, ReqData, LogData) ->
       Writer = fun() -> send_file_body_parts(ReqData#wm_reqdata.socket, Parts, Filename) end,
  
positive.code:     Size = size(Data1),
      _ = send(Socket, Data1),
      Size.
  
  send(undefined, _Data) ->
      ok;
  
negative.code: 
  
  %% @doc Infer incoming body length from transfer-encoding and content-length headers.
  %% @todo Should support gzip/compressed transfer-encoding
  body_length(ReqData) ->
      case get_header_value("transfer-encoding", ReqData) of
          undefined ->
  