vcr_test_path() fix: look for 'tests' dir instead of DESCRIPTION

- DESCRIPTION is not available for tests run by R CMD check, ropensci#235
dpprdan · May 24, 2021 · 2881b58 · 2881b58
1 parent e4f8237
commit 2881b58
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/vcr_test_path.R b/R/vcr_test_path.R
@@ -16,7 +16,7 @@
 vcr_test_path <- function(...) {
   if (missing(...)) stop("Please provide a directory name.")
   if (any(!nzchar(...))) stop("Please use non empty path elements.")
-  root <- rprojroot::is_r_package
+  root <- rprojroot::has_dir("tests")
   path <- root$find_file("tests", ...)
   if (!dir.exists(path)){
     message("could not find ", path, "; creating it")