Add a single quote

LieberInstitute · Jan 12, 2024 · f0193d4 · f0193d4
1 parent 54a62a1
commit f0193d4
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/test-utils.R b/tests/testthat/test-utils.R
@@ -7,7 +7,7 @@ test_that("check_tx_names throw error if annotation is not GENCODE or ENSEMBL",
   rownames(altered_covComb_tx_deg) <- paste0("gene", 1:length(rownames(altered_covComb_tx_deg))) 
   sig_transcripts <- select_transcripts("cell_component")
   expect_error(check_tx_names(rownames(altered_covComb_tx_deg), sig_transcripts, 'rownames(rse_tx)', 'sig_transcripts'), "rownames\\(rse_tx\\)' must use either all GENCODE or all ENSEMBL transcript IDs")
-  expect_error(check_tx_names(sig_transcripts, rownames(altered_covComb_tx_deg), 'sig_transcripts', 'rownames(rse_tx)'), "sig_transcripts' must use either all GENCODE or all ENSEMBL transcript IDs")
+  expect_error(check_tx_names(sig_transcripts, rownames(altered_covComb_tx_deg), 'sig_transcripts', 'rownames(rse_tx)'), "'sig_transcripts' must use either all GENCODE or all ENSEMBL transcript IDs")
 })
 
 # Test for check_tx_names transcripts throw errors if annotation is not mixed GENCODE and ENSEMBL