R/local-utils.R

Defines functions validate_local_package match_local_paths_args

match_local_paths_args <- function(paths) {
  if (identical(paths, "all")) .libPaths() else paths
}

validate_local_package <- function(package, path) {
  # If none found, Find() returns NULL
  if (is.null(path)) {
    stopf("Can't find package `%1$s` in the specified paths.", package)
  }
}
ErdaradunGaztea/woodendesc documentation built on Feb. 1, 2025, 2:26 a.m.