.setup/cran/validate.R

In jeksterslab/template: Title

#' validate email
Validate <- function() {
  root <- rprojroot::is_rstudio_project
  path <- dirname(
    root$find_file(
      project.Rproj
    )
  )
  source(
    file.path(
      path,
      "tools",
      "project.R"
    )
  )
  rhub::validate_email(email = git_email)
}