anchor.diff:  		 end,
       start_response({Code, HResponse1});
   respond({Code, ResponseHeaders, Body}) ->
  -    Length = iolist_size(Body),
  -    HResponse = mochiweb_headers:make(ResponseHeaders),
  -    HResponse1 = mochiweb_headers:enter("Content-Length", Length, HResponse),
  -    Response = start_response({Code, HResponse1}),
  +    Response = start_response_length({Code, ResponseHeaders, iolist_size(Body)}),
       case Method of
   	'HEAD' ->
   	    ok;
  
positive.code:     mochiweb:new_response({THIS, Code, ResponseHeaders}).
  
  
  %% @spec respond({integer(), ioheaders(), iodata() | chunked | {file, IoDevice}}) -> response()
  %% @doc Start the HTTP response with start_response, and send Body to the
  %%      client (if the get(method) /= 'HEAD'). The Content-Length header
  %%      will be set by the Body length, and the server will insert header
  %%      defaults.
  respond({Code, ResponseHeaders, {file, IoDevice}}) ->
      {ok, Body} = read_iodevice(IoDevice),
      respond({Code, ResponseHeaders, Body});
  respond({Code, ResponseHeaders, chunked}) ->
      HResponse = mochiweb_headers:make(ResponseHeaders),
      HResponse1 = case Method of
  
negative.code: make_version(_) ->
      <<"HTTP/1.1 ">>.
  
  iodevice_stream(IoDevice) ->
      case file:read(IoDevice, ?READ_SIZE) of
          eof ->
              ok;
          {ok, Data} ->
              ok = send(Data),
              iodevice_stream(IoDevice)
      end.
  
  
  parts_to_body([{Start, End, Body}], ContentType, Size) ->
      %% return body for a range reponse with a single body
  