src/library/pkgdepends/R/files.R

mkdirp <- function(dir, msg = NULL) {
  s <- vlapply(dir, dir.create, recursive = TRUE, showWarnings = FALSE)
  if (any(s) && !is.null(msg)) {
    cli::cli_alert_info(c(msg, ": {.path {dir[s]}}"))
  }
  invisible(s)
}
r-lib/pkg documentation built on May 6, 2024, 3:04 p.m.