fixes tests

adamhsparks · Nov 30, 2024 · ef5b530 · ef5b530
1 parent 0ec3e24
commit ef5b530
Showing 1 changed file with 14 additions and 17 deletions.
diff --git a/tests/testthat/test-get_aagis_regions.R b/tests/testthat/test-get_aagis_regions.R
@@ -3,25 +3,22 @@
 withr::local_envvar(R_USER_CACHE_DIR = file.path(tempdir(), "abares.cache.1"))
 
 # without caching ----
-with_mock_dir("test-get_aagis_regions", {
-  test_that("get_aagis_regions doesn't cache", {
-    skip_if_offline()
-    skip_on_ci()
-    x <- get_aagis_regions(cache = FALSE)
-    expect_s3_class(x, "sf")
-    expect_false(file.exists(
-      file.path(.find_user_cache(), "aagis_regions_dir/aagis.rds")
-    ))
-  })
+test_that("get_aagis_regions doesn't cache", {
+  skip_if_offline()
+  skip_on_ci()
+  x <- get_aagis_regions(cache = FALSE)
+  expect_s3_class(x, "sf")
+  expect_false(file.exists(
+    file.path(.find_user_cache(), "aagis_regions_dir/aagis.rds")
+  ))
 })
 
-with_mock_dir("test-get_aagis_regions", {
-  test_that("get_aagis_regions skips downloading if still in tempdir()", {
-    skip_if_offline()
-    skip_on_ci()
-    x <- .check_existing_aagis(cache = FALSE)
-    expect_s3_class(x, "sf")
-  })
+
+test_that("get_aagis_regions skips downloading if still in tempdir()", {
+  skip_if_offline()
+  skip_on_ci()
+  x <- .check_existing_aagis(cache = FALSE)
+  expect_s3_class(x, "sf")
 })
 
 # with caching ----