tests/testthat/helper-mock.R

In vdiffr: Visual Regression Testing and Graphical Diffing

vdiffr_skip_stale <- function() {
  skip_if_not_installed("base", "4.1.0")
}

create_mock_pkg <- function(pkg = "mock-pkg") {
  dir <- tempfile()

  dir.create(dir, recursive = TRUE)
  file.copy(pkg, dir, recursive = TRUE)

  # Enable `R CMD check` logging
  from <- file.path(dir, pkg)
  to <- paste0(from, ".Rcheck")
  file.rename(from, to)

  to
}