Adds 1 second delay between actions, hoping this will give CI time to…

… match input status
mlverse · Apr 3, 2024 · b1b4c50 · b1b4c50
1 parent e55ecce
commit b1b4c50
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/tests/testthat/test-app-server.R b/tests/testthat/test-app-server.R
@@ -5,13 +5,18 @@ test_that("chattr app initial values are consistent", {
     shiny_app,
     options = list("chattr-shiny-test" = TRUE)
   )
+  Sys.sleep(1)
   app$expect_values(screenshot_args = FALSE)
   app$set_inputs(prompt = "hello", allow_no_input_binding_ = TRUE)
+  Sys.sleep(1)
   app$click("submit")
+  Sys.sleep(1)
   app$expect_values(screenshot_args = FALSE)
   app$click("options")
+  Sys.sleep(1)
   app$expect_values(screenshot_args = FALSE)
   app$click("saved")
+  Sys.sleep(1)
   app$expect_values(screenshot_args = FALSE)
 })