removing modules call.

insightsengineering · Apr 12, 2024 · 10d2106 · 10d2106
1 parent 96a3dfe
commit 10d2106
Showing 1 changed file with 14 additions and 16 deletions.
diff --git a/tests/testthat/helper-TealAppDriver.R b/tests/testthat/helper-TealAppDriver.R
@@ -34,22 +34,20 @@ simple_cdisc_data <- function(datasets = c("ADSL", "ADRS", "ADTTE")) {
 app_driver_tm_data_table <- function() {
   app <- TealAppDriver$new(
     data = simple_teal_data(),
-    modules = teal::modules(
-      tm_data_table(
-        label = "Data Table",
-        variables_selected = list(
-          iris = c("Sepal.Length", "Sepal.Width", "Petal.Length", "Petal.Width", "Species")
-        ),
-        datasets_selected = c("iris", "mtcars"),
-        dt_args = list(caption = "Table Caption"),
-        dt_options = list(
-          searching = FALSE, pageLength = 30, lengthMenu = c(5, 15, 30, 100),
-          scrollX = TRUE
-        ),
-        server_rendering = FALSE,
-        pre_output = NULL,
-        post_output = NULL
-      )
+    modules = tm_data_table(
+      label = "Data Table",
+      variables_selected = list(
+        iris = c("Sepal.Length", "Sepal.Width", "Petal.Length", "Petal.Width", "Species")
+      ),
+      datasets_selected = c("iris", "mtcars"),
+      dt_args = list(caption = "Table Caption"),
+      dt_options = list(
+        searching = FALSE, pageLength = 30, lengthMenu = c(5, 15, 30, 100),
+        scrollX = TRUE
+      ),
+      server_rendering = FALSE,
+      pre_output = NULL,
+      post_output = NULL
     ),
     timeout = 3000
   )