remove bucket acl fxns #24

NAMESPACE

@@ -1,8 +1,6 @@
 # Generated by roxygen2: do not edit by hand
 
 export(as_policy_arn)
-export(aws_bucket_acl_get)
-export(aws_bucket_acl_modify)
 export(aws_bucket_create)
 export(aws_bucket_delete)
 export(aws_bucket_download)

R/bucket.R

@@ -205,34 +205,3 @@ aws_buckets <- function(...) {
 aws_bucket_tree <- function(bucket, recurse = TRUE, ...) {
   s3fs::s3_dir_tree(bucket, recurse = recurse, ...)
 }
-
-#' Get a bucket ACL
-#'
-#' @export
-#' @inheritParams aws_bucket_exists
-#' @details see docs at <https://www.paws-r-sdk.com/docs/s3_get_bucket_acl/>
-#' @return named list, with slots: `Owner`, `Grants`
-#' @examples \dontrun{
-#' aws_bucket_acl_get("s3://s64-test-2")
-#' }
-aws_bucket_acl_get <- function(bucket) {
-  bucket <- path_s3_parse(bucket)[[1]]$bucket
-  env64$s3$get_bucket_acl(bucket)
-}
-#' Modify a bucket ACL
-#'
-#' NOTE: Not tested as don't have access to edit ACLs
-#'
-#' @export
-#' @inheritParams aws_bucket_exists
-#' @param acl (character) The canned ACL to apply to the bucket. required
-#' @param ... named params passed on to
-#' <https://www.paws-r-sdk.com/docs/s3_put_bucket_acl/>
-#' @examples \dontrun{
-#' aws_bucket_acl_modify("s3://s64-test-2", acl = "authenticated-read")
-#' aws_bucket_acl_get("s3://s64-test-2")
-#' }
-aws_bucket_acl_modify <- function(bucket, acl, ...) {
-  bucket <- path_s3_parse(bucket)[[1]]$bucket
-  env64$s3$put_bucket_acl(ACL = acl, Bucket = bucket, ...)
-}