From 43cd1677864c4707e4b563e8ef98051a3bcf1bcf Mon Sep 17 00:00:00 2001 From: unknown Date: Mon, 6 May 2024 14:02:29 +0530 Subject: [PATCH] @vedhav suggestions. --- tests/testthat/test-shinytest2-tm_a_mmrm.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/testthat/test-shinytest2-tm_a_mmrm.R b/tests/testthat/test-shinytest2-tm_a_mmrm.R index a1fe07a8d..9f5a2772d 100644 --- a/tests/testthat/test-shinytest2-tm_a_mmrm.R +++ b/tests/testthat/test-shinytest2-tm_a_mmrm.R @@ -159,7 +159,7 @@ testthat::test_that("e2e - tm_a_mmrm: Click on fit model shows table for default table <- app_driver$get_active_module_tws_output("mmrm_table") col_val <- app_driver$get_active_module_input("buckets") testthat::expect_true(all(unlist(col_val, use.names = FALSE) %in% colnames(table))) - testthat::expect_gte(nrow(table), 25) + testthat::expect_equal(nrow(table), 25) app_driver$stop() })