Update SingleR unit tests so it works for all versions of SingleR

Author: mvfki

tests/testthat/test-cellTypeLabeling.R

@@ -16,8 +16,7 @@ test_that(desc = "Testing SingleR", {
     sce <- runSingleR(sce)
     testthat::expect_true("SingleR_hpca_main_scores" %in% names(colData(sce)))
     testthat::expect_true("SingleR_hpca_main_labels" %in% names(colData(sce)))
-    #testthat::expect_true("SingleR_hpca_main_first.labels" %in% names(colData(sce)))
-    #testthat::expect_true("SingleR_hpca_main_delta.next" %in% names(colData(sce)))
+    testthat::expect_true("SingleR_hpca_main_first.labels" %in% names(colData(sce)) | "SingleR_hpca_main_delta.next" %in% names(colData(sce)))
     testthat::expect_true("SingleR_hpca_main_pruned.labels" %in% names(colData(sce)))
   })
 })