fix: e2e tests

insightsengineering · Nov 8, 2024 · e39ac50 · e39ac50
1 parent bb04855
commit e39ac50
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/tm_g_pp_adverse_events.R b/R/tm_g_pp_adverse_events.R
@@ -154,7 +154,7 @@ template_adverse_events <- function(dataname = "ANL",
 
   chart_list <- add_expr(
     expr_ls = chart_list,
-    new_expr = quote(print(plot))
+    new_expr = quote(plot)
   )
 
   y$table <- bracket_expr(table_list)

diff --git a/R/tm_g_pp_therapy.R b/R/tm_g_pp_therapy.R
@@ -192,7 +192,7 @@ template_therapy <- function(dataname = "ANL",
         ggtheme +
         theme
 
-      print(therapy_plot)
+      therapy_plot
     }, env = c(
       list(
         dataname = as.name(dataname),