Merge branch '1187_decorate_output@main' of https://github.com/insigh…

…tsengineering/teal into 1187_decorate_output@main
insightsengineering · Nov 18, 2024 · cdf8797 · cdf8797
2 parents 29ea4f1 + d7c1f7e
commit cdf8797
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/R/dummy_functions.R b/R/dummy_functions.R
@@ -46,6 +46,7 @@ example_module <- function(label = "example teal module",
         })
 
         table_data <- reactive({
+          req(input$dataname)
           within(data(),
             {
               object <- dataname
@@ -57,7 +58,7 @@ example_module <- function(label = "example teal module",
         table_data_decorated <- srv_teal_transform_data("decorate", data = table_data, transformators = decorators)
 
         output$text <- renderPrint({
-          req(table_data_decorated)
+          req(table_data_decorated())
           table_data_decorated()[["object"]]
         })
 

diff --git a/R/modules.R b/R/modules.R
@@ -417,7 +417,7 @@ format.teal_module <- function(
   if ("transformators" %in% what) {
     output <- paste0(
       output,
-      content_prefix, "L- ", crayon::magenta("transformators       : "), transformators, "\n"
+      content_prefix, "L- ", crayon::magenta("Transformators       : "), transformators, "\n"
     )
   }