anchor.diff:                   end,
       start_response({Code, HResponse1}, THIS);
   respond({Code, ResponseHeaders, Body}, {?MODULE, [_Socket, Method, _RawPath, _Version, _Headers]}=THIS) ->
  -    Response = start_response_length({Code, ResponseHeaders, iolist_size(Body)}, THIS),
  +    {Header, Response} = format_response_header({Code, ResponseHeaders, iolist_size(Body)}, THIS),
       case Method of
  -        'HEAD' ->
  -            ok;
  -        _ ->
  -            send(Body, THIS)
  +        'HEAD' -> send(Header, THIS);
  +        _      -> send([Header, Body], THIS)
       end,
       Response.
   
  
positive.code:     HResponse = mochiweb_headers:make(ResponseHeaders),
      HResponse1 = mochiweb_headers:enter("Content-Length", Length, HResponse),
      start_response({Code, HResponse1}, THIS).
  
  %% @spec respond({integer(), ioheaders(), iodata() | chunked | {file, IoDevice}}, request()) -> response()
  %% @doc Start the HTTP response with start_response, and send Body to the
  
negative.code: %%      ResponseHeaders. The server will set header defaults such as Server
  %%      and Date if not present in ResponseHeaders.
  start_response({Code, ResponseHeaders}, {?MODULE, [_Socket, _Method, _RawPath, _Version, _Headers]}=THIS) ->
      start_raw_response({Code, ResponseHeaders}, THIS).
  
  %% @spec start_raw_response({integer(), headers()}, request()) -> response()
  %% @doc Start the HTTP response by sending the Code HTTP response and
  %%      ResponseHeaders.
  start_raw_response({Code, ResponseHeaders}, {?MODULE, [_Socket, _Method, _RawPath, _Version, _Headers]}=THIS) ->
      {Header, Response} = format_response_header({Code, ResponseHeaders}, THIS),
      send(Header, THIS),
      Response.
  
  
  %% @spec start_response_length({integer(), ioheaders(), integer()}, request()) -> response()
  