Fix regression test.

cole-trapnell-lab · Nov 9, 2023 · ece54a0 · ece54a0
1 parent 98471cc
commit ece54a0
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/tests/testthat/test-identity.R b/tests/testthat/test-identity.R
@@ -91,19 +91,19 @@ test_that("identity strings", {
 
   expect_equal(cds2@reduce_dim_aux[['PCA']][['model']][['identity']][['model_type']], 'matrix:PCA')  
   expect_equal(cds2@reduce_dim_aux[['PCA']][['model']][['identity']][['model_id']], cds@reduce_dim_aux[['PCA']][['model']][['identity']][['model_id']])
-  expect_equal(cds2@reduce_dim_aux[['PCA']][['model']][['identity']][['model_path']], transform_models)  
+  expect_equal(cds2@reduce_dim_aux[['PCA']][['model']][['identity']][['model_path']], normalizePath(transform_models, mustWork=FALSE))  
 
   expect_equal(cds2@reduce_dim_aux[['Aligned']][['model']][['identity']][['model_type']], 'matrix:Aligned')
   expect_equal(cds2@reduce_dim_aux[['Aligned']][['model']][['identity']][['model_id']], cds@reduce_dim_aux[['Aligned']][['model']][['identity']][['model_id']])
   expect_equal(cds2@reduce_dim_aux[['Aligned']][['model']][['identity']][['prev_model_type']], cds@reduce_dim_aux[['Aligned']][['model']][['identity']][['prev_model_type']])
   expect_equal(cds2@reduce_dim_aux[['Aligned']][['model']][['identity']][['prev_model_id']], cds@reduce_dim_aux[['Aligned']][['model']][['identity']][['prev_model_id']])
-  expect_equal(cds2@reduce_dim_aux[['Aligned']][['model']][['identity']][['model_path']], transform_models)
+  expect_equal(cds2@reduce_dim_aux[['Aligned']][['model']][['identity']][['model_path']], normalizePath(transform_models, mustWork=FALSE))
 
   expect_equal(cds2@reduce_dim_aux[['UMAP']][['model']][['identity']][['model_type']], 'matrix:UMAP')
   expect_equal(cds2@reduce_dim_aux[['UMAP']][['model']][['identity']][['model_id']], cds@reduce_dim_aux[['UMAP']][['model']][['identity']][['model_id']])
   expect_equal(cds2@reduce_dim_aux[['UMAP']][['model']][['identity']][['prev_model_type']], cds@reduce_dim_aux[['UMAP']][['model']][['identity']][['prev_model_type']])
   expect_equal(cds2@reduce_dim_aux[['UMAP']][['model']][['identity']][['prev_model_id']], cds@reduce_dim_aux[['UMAP']][['model']][['identity']][['prev_model_id']])
-  expect_equal(cds2@reduce_dim_aux[['UMAP']][['model']][['identity']][['model_path']], transform_models)
+  expect_equal(cds2@reduce_dim_aux[['UMAP']][['model']][['identity']][['model_path']], normalizePath(transform_models, mustWork=FALSE))
 
   system(paste0('rm -r ', mtxfile, ' ', pdtfile, ' ', fdtfile, ' ', transform_models))
 })