Protect call

tidyverse · Nov 22, 2023 · f953c52 · f953c52
1 parent 39a6567
commit f953c52
Showing 1 changed file with 7 additions and 6 deletions.
diff --git a/tests/testthat/helper.R b/tests/testthat/helper.R
@@ -1,11 +1,12 @@
 
 # Work around R.cache bug on CI
-dir.create(
-  tools::R_user_dir("R.cache", which = "cache"),
-  recursive = TRUE,
-  showWarnings = FALSE
-)
-# getNamespace("R.cache")$setCachePath(c("styler", styler:::styler_version), tempdir())
+if (getRversion() >= "4.0.0" && identical(Sys.getenv("CI"), "true")) {
+  dir.create(
+    tools::R_user_dir("R.cache", which = "cache"),
+    recursive = TRUE,
+    showWarnings = FALSE
+  )
+}
 
 expect_error_free <- function(...) {
   expect_error(..., regexp = NA)