anchor.diff:                               requested_perm='WRITE_ACP',
                                riakc_pid=RiakPid}) ->
       dt_entry(<<"accept_body">>, [], [extract_name(User), Bucket]),
  +    dt_entry_bucket(<<"put_acl">>, [], [extract_name(User), Bucket]),
       Body = binary_to_list(wrq:req_body(RD)),
       case Body of
           [] ->
  
positive.code: dt_entry(Func, Ints, Strings) ->
      riak_cs_dtrace:dtrace(?DT_WM_OP, 1, Ints, ?MODULE, Func, Strings).
  
  dt_return(Func) ->
      dt_return(Func, [], []).
  
  dt_return(Func, Ints, Strings) ->
      riak_cs_dtrace:dtrace(?DT_WM_OP, 2, Ints, ?MODULE, Func, Strings).
  
negative.code:                         requested_perm='READ_ACP',
                          riakc_pid=RiakPid}) ->
      dt_entry(<<"to_xml">>, [], [extract_name(User), Bucket]),
      dt_entry_bucket(<<"get_acl">>, [], [extract_name(User), Bucket]),
      case riak_moss_acl:bucket_acl(Bucket, RiakPid) of
          {ok, Acl} ->
              X = {riak_moss_acl_utils:acl_to_xml(Acl), RD, Ctx},
              ok = riak_cs_stats:update_with_start(bucket_get_acl, StartTime),
              dt_return(<<"to_xml">>, [200], [extract_name(User), Bucket]),
              dt_return_bucket(<<"get_acl">>, [200], [extract_name(User), Bucket]),
              X;
          {error, Reason} ->
              Code = riak_moss_s3_response:status_code(Reason),
              X = riak_moss_s3_response:api_error(Reason, RD, Ctx),
              dt_return(<<"to_xml">>, [Code], [extract_name(User), Bucket]),
              dt_return_bucket(<<"get_acl">>, [Code], [extract_name(User), Bucket]),
              X
      end.
  
  