R/use_dependencies.R

In umr1283/umr1283: UMR 1283 - Project Template

#' @keywords internal
use_dependencies <- function(project = ".") {
  proj <- normalizePath(project, mustWork = FALSE)

  withr::with_dir(proj, {
    file <- "scripts/_dependencies.R"
    if (!file.exists(file)) {
      file.create(file)
    } else {
      message(sprintf("\"%s\" already exists! Nothing was done!", file))
    }
  })
  invisible(TRUE)
}