Removed tempdir() from chkDir-test (try to get it running with pkgcheck

sjentsch · Dec 16, 2023 · 698752d · 698752d
1 parent b68e2e4
commit 698752d
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/tests/testthat/test-globals.R b/tests/testthat/test-globals.R
@@ -9,10 +9,10 @@ test_that("globals work", {
     expect_true(chkDir(nmeOMV))
     if (.Platform$OS.type == "unix") {
         # permissions on *nix-systems
-        dir.create(file.path(tempdir(), "chkPrm"), mode = "0111")
-        expect_error(chkDir(file.path(tempdir(), "chkPrm", "Trial.omv")),
+        dir.create("chkPrm", mode = "0111")
+        expect_error(chkDir(file.path("chkPrm", "Trial.omv")),
           regexp = "The directory \\(.*\\) exists, but you don't have writing permissions in that directory\\.")
-        unlink(file.path(tempdir(), "chkPrm"), recursive = TRUE)
+        unlink("chkPrm", recursive = TRUE)
     }
     expect_true(chkDtF(jmvReadWrite::ToothGrowth, minSze = c(60, 7)))
     expect_true(chkExt(nmeOMV, vldExt))