update snapshot, add wait_for_idle (#369)

- update snapshots - add waiting for idle thank you for the review Co-authored-by: benoit <[email protected]>
insightsengineering · Mar 13, 2024 · e590ea5 · e590ea5
1 parent 1b9e230
commit e590ea5
Show file tree

Hide file tree

Showing 14 changed files with 3 additions and 1 deletion.
diff --git a/tests/testthat/_snaps/windows-4.3/boxplot/boxplot-001.png b/tests/testthat/_snaps/windows-4.3/boxplot/boxplot-001.png
diff --git a/tests/testthat/_snaps/windows-4.3/forest/forest_tte-001.png b/tests/testthat/_snaps/windows-4.3/forest/forest_tte-001.png
diff --git a/tests/testthat/_snaps/windows-4.3/km/km-001.new.png b/tests/testthat/_snaps/windows-4.3/km/km-001.new.png
diff --git a/tests/testthat/_snaps/windows-4.3/pca/pca-004.png b/tests/testthat/_snaps/windows-4.3/pca/pca-004.png
diff --git a/tests/testthat/_snaps/windows-4.3/pca/pca-007.png b/tests/testthat/_snaps/windows-4.3/pca/pca-007.png
diff --git a/tests/testthat/_snaps/windows-4.3/pca/pca-008.png b/tests/testthat/_snaps/windows-4.3/pca/pca-008.png
diff --git a/tests/testthat/_snaps/windows-4.3/pca/pca-009.png b/tests/testthat/_snaps/windows-4.3/pca/pca-009.png
diff --git a/tests/testthat/_snaps/windows-4.3/pca/pca-010.png b/tests/testthat/_snaps/windows-4.3/pca/pca-010.png
diff --git a/tests/testthat/_snaps/windows-4.3/quality/quality-003.png b/tests/testthat/_snaps/windows-4.3/quality/quality-003.png
diff --git a/tests/testthat/_snaps/windows-4.3/scatterplot/scatterplot-001.new.png b/tests/testthat/_snaps/windows-4.3/scatterplot/scatterplot-001.new.png
diff --git a/tests/testthat/_snaps/windows-4.3/volcanoplot/volcanoplot-001.png b/tests/testthat/_snaps/windows-4.3/volcanoplot/volcanoplot-001.png
diff --git a/tests/testthat/_snaps/windows-4.3/volcanoplot/volcanoplot-002.png b/tests/testthat/_snaps/windows-4.3/volcanoplot/volcanoplot-002.png
diff --git a/tests/testthat/test-pca.R b/tests/testthat/test-pca.R
@@ -155,7 +155,7 @@ test_that("pca module works as expected in the test app", {
   app$set_inputs(!!ns("show_matrix") := TRUE)
 
   app$set_inputs(!!ns2("add-MAE-subjects-var_to_add") := "SEX")
-  app$wait_for_idle()
+  app$wait_for_idle(timeout = 40000)
   app$set_inputs(!!ns2("active-MAE-subjects-MAE_SEX-inputs-selection") := "M")
 
   # Ensure xvar and yvar get resetted to pc1 and pc2.

diff --git a/tests/testthat/test-quality.R b/tests/testthat/test-quality.R
@@ -32,6 +32,7 @@ test_that("quality module works as expected in the test app", {
   app$wait_for_idle(timeout = 20000)
   ns <- module_ns_shiny2(app)
 
+
   # Check initial state of encodings.
   res <- app$get_value(input = ns("experiment-name"))
   expect_identical(res, "hd1")
@@ -67,6 +68,7 @@ test_that("quality module works as expected in the test app", {
   # Change to another plot type so that we can choose another assay.
   app$set_inputs(!!ns("plot_type") := "Top Genes Plot")
   app$set_inputs(!!ns("assay-name") := "cpm")
+  app$wait_for_idle(timeout = 30000)
   app$expect_select_screenshot(ns("plot-plot_out_main"))
   app$stop()
 })