fix unnecessary conversion from teal_data_module to teal_data

insightsengineering · Dec 4, 2023 · 5000351 · 5000351
1 parent f424cd4
commit 5000351
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/init.R b/R/init.R
@@ -102,7 +102,7 @@ init <- function(data,
                  footer = tags$p(),
                  id = character(0)) {
   logger::log_trace("init initializing teal app with: data ({ class(data)[1] }).")
-  if (is.list(data)) {
+  if (is.list(data) && !inherits(data, "teal_data_module")) {
     checkmate::assert_list(data, names = "named")
     data <- do.call(teal.data::teal_data, data)
   }