diff --git a/R/blob_client_funcs.R b/R/blob_client_funcs.R index 0f250cf..5a0cc64 100644 --- a/R/blob_client_funcs.R +++ b/R/blob_client_funcs.R @@ -53,7 +53,7 @@ print.blob_container <- function(object, ...) cat("Azure blob container\n") cat(sprintf("Endpoint URL: %s\n", object$endpoint$url)) if(!is_empty(object$endpoint$key)) - cat("Access key: \n") + cat("Access key: \n") else cat("Access key: \n") if(!is_empty(object$endpoint$sas)) cat("Account shared access signature: \n") diff --git a/R/client.R b/R/client.R index 853adb7..95f1aba 100644 --- a/R/client.R +++ b/R/client.R @@ -40,10 +40,10 @@ print.storage_endpoint <- function(object) cat(sprintf("Azure %s storage endpoint\n", type)) cat(sprintf("URL: %s\n", object$url)) if(!is_empty(object$key)) - cat("Access key: \n") + cat("Access key: \n") else cat("Access key: \n") if(!is_empty(object$sas)) - cat("Account shared access signature: \n") + cat("Account shared access signature: \n") else cat("Account shared access signature: \n") cat(sprintf("Storage API version: %s", object$api_version)) invisible(object) diff --git a/R/file_client_funcs.R b/R/file_client_funcs.R index 2b72279..d19d7f3 100644 --- a/R/file_client_funcs.R +++ b/R/file_client_funcs.R @@ -51,7 +51,7 @@ print.file_share <- function(object, ...) cat("Azure file share\n") cat("Endpoint URL: %s\n", object$endpoint$url) if(!is_empty(object$endpoint$key)) - cat("Access key: \n") + cat("Access key: \n") else cat("Access key: \n") if(!is_empty(object$endpoint$sas)) cat("Account shared access signature: \n") diff --git a/R/storage_properties.R b/R/storage_properties.R index 808b5cd..75471e7 100644 --- a/R/storage_properties.R +++ b/R/storage_properties.R @@ -8,6 +8,13 @@ #' @details #' The `get_storage_properties` generic returns a list of properties for the given storage object. There are methods defined for objects of class `storage_endpoint`, `blob_container` and `file_share`. Similar functions are defined for individual blobs, files and directories. #' +#' @seealso +#' [storage_endpoint], [blob_container], [file_share], +#' [Blob service properties reference[(https://docs.microsoft.com/en-us/rest/api/storageservices/get-blob-service-properties). +#' [File service properties reference](https://docs.microsoft.com/en-us/rest/api/storageservices/get-file-service-properties), +#' [Blob container properties reference](https://docs.microsoft.com/en-us/rest/api/storageservices/get-container-properties), +#' [File share properties reference](https://docs.microsoft.com/en-us/rest/api/storageservices/get-share-properties) +#' #' @rdname properties #' @export get_storage_properties <- function(object, ...) diff --git a/R/storage_utils.R b/R/storage_utils.R index d19c81c..7e5acd1 100644 --- a/R/storage_utils.R +++ b/R/storage_utils.R @@ -63,7 +63,7 @@ do_storage_call <- function(endpoint_url, path, options=list(), headers=list(), storage_error_message <- function(response, for_httr=TRUE) { - cont <- httr::content(response) + cont <- suppressMessages(httr::content(response)) msg <- if(inherits(cont, "xml_node")) { cont <- xml2::as_list(cont) diff --git a/man/properties.Rd b/man/properties.Rd index 0a3476c..2f93020 100644 --- a/man/properties.Rd +++ b/man/properties.Rd @@ -39,3 +39,15 @@ Get storage properties for an endpoint or container \details{ The \code{get_storage_properties} generic returns a list of properties for the given storage object. There are methods defined for objects of class \code{storage_endpoint}, \code{blob_container} and \code{file_share}. Similar functions are defined for individual blobs, files and directories. } +\seealso{ +\link{storage_endpoint}, \link{blob_container}, \link{file_share}, +[Blob service properties reference[(https://docs.microsoft.com/en-us/rest/api/storageservices/get-blob-service-properties). +\href{https://docs.microsoft.com/en-us/rest/api/storageservices/get-file-service-properties}{File service properties reference}, +\href{https://docs.microsoft.com/en-us/rest/api/storageservices/get-container-properties}{Blob container properties reference}, +\href{https://docs.microsoft.com/en-us/rest/api/storageservices/get-share-properties}{File share properties reference} + +[Blob service properties reference[(https://docs.microsoft.com/en-us/rest/api/storageservices/get-blob-service-properties). +[File service properties reference]: R:Blob%20service%20properties%20reference[(https://docs.microsoft.com/en-us/rest/api/storageservices/get-blob-service-properties).%0A[File%20service%20properties%20reference +[Blob container properties reference]: R:Blob%20container%20properties%20reference +[File share properties reference]: R:File%20share%20properties%20reference +}