anchor.diff:  
   start_chunked_response(#httpd{mochi_req=MochiReq}=Req, Code, Headers) ->
       couch_stats_collector:increment({httpd_status_codes, Code}),
  -    {ok, MochiReq:respond({Code, Headers ++ server_header() ++ couch_httpd_auth:cookie_auth_header(Req, Headers), chunked})}.
  +    Resp = MochiReq:respond({Code, Headers ++ server_header() ++ couch_httpd_auth:cookie_auth_header(Req, Headers), chunked}),
  +    case MochiReq:get(method) of
  +    'HEAD' -> throw({http_head_abort, Resp});
  +    _ -> ok
  +    end,
  +    {ok, Resp}.
   
   send_chunk(Resp, Data) ->
       Resp:write_chunk(Data),
  
positive.code:     end,
  
      increment_method_stats(Method1),
  
      % alias HEAD to GET as mochiweb takes care of stripping the body
      Method = case Method1 of
          'HEAD' -> 'GET';
  
negative.code:             Response
          end
      catch
          throw:{http_head_abort, Resp0} ->
              {ok, Resp0};
          throw:Error ->
              ?LOG_DEBUG("Minor error in HTTP request: ~p",[Error]),
              ?LOG_DEBUG("Stacktrace: ~p",[erlang:get_stacktrace()]),
  