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/pak documentation built on May 28, 2024, 10:33 p.m.