fix: adapt unit test to Windows OS

rformassspectrometry · May 17, 2024 · 44050a0 · 44050a0
1 parent 8527d64
commit 44050a0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/test_MsBackendMzR.R b/tests/testthat/test_MsBackendMzR.R
@@ -579,7 +579,7 @@ test_that("dataStorageBasePath,dataStorageBasePath<-,MsBackendMzR works", {
                  MsCoreUtils::common_path(sciex_file))
     tmp <- sciex_mzr
     dataStorageBasePath(tmp) <- tmpd
-    expect_equal(dataStorageBasePath(tmp), tmpd)
+    expect_equal(dataStorageBasePath(tmp), gsub("\\", "/", tmpd, fixed = TRUE))
 
     #' errors
     expect_error(dataStorageBasePath(tmp) <- "some path", "Provided path")