Skip to content

Commit ecb1483

Browse files
fix shinytests
1 parent cb3b7cb commit ecb1483

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

inst/app/tests/testthat/test-shinytest2.R

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -117,7 +117,7 @@ test_that("{shinytest2} recording: Single-Cell Tab", {
117117
all_prev_files <- c(init_files, dataset_files, prev_file)
118118
markers_file <- setdiff(list_files(), all_prev_files)
119119
expect_equal(markers_file, "test_data_dir/test_user/default/single-cell/mock_10x/snn1/markers.qs")
120-
expect_equal(unname(tools::md5sum(markers_file)), "fadb32f7c1c082fdefc057158e30e5eb")
120+
expect_equal(unname(tools::md5sum(markers_file)), "c62b82b13cf26250de7b1951f47e193a")
121121

122122
# clusters and markers plot have same coordinates
123123
app$set_inputs(`sc-form-gene_clusters-gene_table_rows_selected` = 1, allow_no_input_binding_ = TRUE)
@@ -161,7 +161,7 @@ test_that("{shinytest2} recording: Single-Cell Tab", {
161161
app$click("sc-form-cluster-show_contrasts")
162162

163163
marker_colors <- app$wait_for_value(export = 'sc-marker_plot_cluster-colors', timeout = timeout)
164-
expect_length(unique(marker_colors), 94)
164+
expect_length(unique(marker_colors), 104)
165165

166166
# can set custom boolean metric
167167
app$click("sc-form-gene_clusters-show_custom_metric")

0 commit comments

Comments
 (0)