anchor.diff:              RD2 = wrq:append_to_resp_body(JSON, RD),
               {{halt, 400}, RD2, Ctx}
       end.
  -
  -%% @spec delete_resource(reqdata(), context()) -> {boolean, reqdata(), context()}
  -%% @doc Reset the bucket properties back to the default values
  -delete_resource(RD, Ctx=#ctx{bucket_type=T}) ->
  -    case riak_core_bucket_type:reset(T) of
  -        ok ->
  -            {true, RD, Ctx};
  -        Error ->
  -            {false,
  -             wrq:append_to_resp_body(
  -               io_lib:format("The bucket type ~s could not be reset: ~p~n", [T, Error]),
  -               wrq:set_resp_header(?HEAD_CTYPE, "text/plain", RD)), Ctx}
  -    end.
  
positive.code:                 'GET' ->
                      "riak_core.get_bucket_type";
                  'HEAD' ->
                      "riak_core.get_bucket_type";
                  'DELETE' ->
                      "riak_core.set_bucket_type"
              end,
  
              Res = riak_core_security:check_permission({Perm, Ctx#ctx.bucket_type}, Security),
  
negative.code: %% @doc Get the list of methods this resource supports.
  %%      Properties allows HEAD, GET, and PUT.
  allowed_methods(RD, Ctx) when Ctx#ctx.api_version =:= 3 ->
      {['HEAD', 'GET', 'PUT'], RD, Ctx}.
  
  %% @spec malformed_request(reqdata(), context()) ->
  %%          {boolean(), reqdata(), context()}
  