avoid @importFrom

From https://r-pkgs.org/namespace.html#import-r

> If you are using just a few functions from another package, my recommendation is to note the package name in the Imports: field of the DESCRIPTION file and call the function(s) explicitly using ::, e.g., pkg::fun().

ref #41

NAMESPACE

@@ -50,6 +50,3 @@ export(update_dataset)
 export(update_dataset_file)
 import(httr)
 import(xml2)
-importFrom(readr,read_tsv)
-importFrom(stats,setNames)
-importFrom(utils,str)

R/SWORD.R

@@ -13,7 +13,7 @@
 #' list_datasets(d[[2]])
 #' }
 #' @seealso Managing a Dataverse: \code{\link{publish_dataverse}}; Managing a dataset: \code{\link{dataset_atom}}, \code{\link{list_datasets}}, \code{\link{create_dataset}}, \code{\link{delete_dataset}}, \code{\link{publish_dataset}}; Managing files within a dataset: \code{\link{add_file}}, \code{\link{delete_file}}
-#' @importFrom stats setNames
+#'
 #' @export
 service_document <- function(key = Sys.getenv("DATAVERSE_KEY"), server = Sys.getenv("DATAVERSE_SERVER"), ...) {
     u <- paste0(api_url(server, prefix="dvn/api/"), "data-deposit/v1.1/swordv2/service-document")

R/get_dataframe.R

@@ -18,8 +18,6 @@
 #'
 #' @inheritDotParams get_file
 #'
-#' @importFrom readr read_tsv
-#'
 #' @examples
 #'
 #' # Retrieve data.frame from dataverse DOI and file name
@@ -86,7 +84,6 @@ get_dataframe_by_name <- function (
 }
 
 #' @rdname get_dataframe
-#' @importFrom readr read_tsv
 #' @export
 get_dataframe_by_id <- function(
   fileid,
@@ -103,8 +100,8 @@ get_dataframe_by_id <- function(
   }
 
   if (is.null(FUN) & isTRUE(ingested) & isFALSE(original)) {
-    message("Downloading ingested version of data with read_tsv. To download the original version and remove this message, set original = TRUE.\n")
-    FUN <- read_tsv
+    message("Downloading ingested version of data with readr::read_tsv. To download the original version and remove this message, set original = TRUE.\n")
+    FUN <- readr::read_tsv
   }
 
   if (is.null(FUN) & (isFALSE(ingested) | isTRUE(original))) {

R/get_dataset.R

@@ -66,7 +66,7 @@ get_dataset <- function(
 
 #' @rdname get_dataset
 #' @param block A character string specifying a metadata block to retrieve. By default this is \dQuote{citation}. Other values may be available, depending on the dataset, such as \dQuote{geospatial} or \dQuote{socialscience}.
-#' @importFrom utils str
+#'
 #' @export
 dataset_metadata <- function(
   dataset,

R/print.R

@@ -33,7 +33,6 @@ print.dataverse <- function(x, ...) {
 }
 
 # dataverse_dataset class
-#' @importFrom utils str
 #' @export
 print.dataverse_dataset <- function(x, ...) {
     cat("Dataset (", x$id, "): ", x$persistentUrl, "\n", sep = "")