anchor.diff:      undefined ->
           Headers0;
       {OAuthProps} ->
  -        [oauth_header(Url, get, OAuthProps) | Headers0]
  +        [oauth_header(Url, [], head, OAuthProps) | Headers0]
       end,
       case catch ibrowse:send_req(Url, Headers, head) of
       {ok, "200", _, _} ->
  
positive.code:     Method = case Action of
          get -> "GET";
          post -> "POST";
          put -> "PUT"
      end,
      Params = oauth:signed_params(Method, Url, [], Consumer, Token, TokenSecret),
      {"Authorization", "OAuth " ++ oauth_uri:params_to_header_string(Params)}.
  
negative.code:         Body
      end.
  
  oauth_header(Url, QS, Action, Props) ->
      QSL = [{couch_util:to_list(K), couch_util:to_list(V)} || {K,V} <- QS],
      ConsumerKey = ?b2l(proplists:get_value(<<"consumer_key">>, Props)),
      Token = ?b2l(proplists:get_value(<<"token">>, Props)),
      TokenSecret = ?b2l(proplists:get_value(<<"token_secret">>, Props)),
  