fix: use normalizePath also for tempdir()

rformassspectrometry · May 17, 2024 · 6bafa7d · 6bafa7d
1 parent 05f5e8b
commit 6bafa7d
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/tests/testthat/test_MsBackendMzR.R b/tests/testthat/test_MsBackendMzR.R
@@ -572,7 +572,7 @@ test_that("backendParallelFactor,MsBackendMzR", {
 })
 
 test_that("dataStorageBasePath,dataStorageBasePath<-,MsBackendMzR works", {
-    tmpd <- tempdir()
+    tmpd <- normalizePath(tempdir())
     file.copy(sciex_file, tmpd)
 
     expect_equal(dataStorageBasePath(sciex_mzr),

diff --git a/tests/testthat/test_Spectra.R b/tests/testthat/test_Spectra.R
@@ -1892,7 +1892,7 @@ test_that("entropy,Spectra works", {
 })
 
 test_that("dataStorageBasePath,dataStorageBasePath<-,MsBackendMzR works", {
-    tmpd <- tempdir()
+    tmpd <- normalizePath(tempdir())
     file.copy(sciex_file, tmpd)
 
     tmp <- Spectra(sciex_mzr)