From 3f592db93356c8aa0246567742145e73c4639c57 Mon Sep 17 00:00:00 2001 From: Milan Malfait <38256462+milanmlft@users.noreply.github.com> Date: Mon, 18 Nov 2024 11:27:25 +0100 Subject: [PATCH] test(app): remove obsolete test --- app/tests/testthat/test-mod_datatable.R | 16 ---------------- 1 file changed, 16 deletions(-) diff --git a/app/tests/testthat/test-mod_datatable.R b/app/tests/testthat/test-mod_datatable.R index 96bf14d..0832f75 100644 --- a/app/tests/testthat/test-mod_datatable.R +++ b/app/tests/testthat/test-mod_datatable.R @@ -52,22 +52,6 @@ test_that("Selected rows are updated when updating `bundle_concepts`", { ) }) -test_that("Low frequencies are replaced in the concepts table", { - testServer( - mod_datatable_server, - args = list( - selected_dates = reactive_dates, - bundle_concepts = reactiveVal() - ), - { - replacement <- as.double(Sys.getenv("LOW_FREQUENCY_REPLACEMENT")) - - expect_true(all(concepts_with_counts()$total_records >= replacement)) - expect_true(all(concepts_with_counts()$mean_persons >= replacement)) - } - ) -}) - test_that("module ui works", { ui <- mod_datatable_ui(id = "test") golem::expect_shinytaglist(ui)