diff --git a/tests/testthat/test_MsBackendMzR.R b/tests/testthat/test_MsBackendMzR.R index 318a73ca..0a4e7954 100644 --- 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")