[Bug]: plots from tm_g_scatterplot and tm_a_regression modules print on IDE 554 (#555)

this PR fixes
#554

---------

Co-authored-by: kartikeya <kartikeya.kirar@unicle.life>
Co-authored-by: github-actions <41898282+github-actions[bot]@users.noreply.github.com>

Author: 3 people

R/tm_a_regression.R

@@ -849,7 +849,9 @@ srv_a_regression <- function(id,
     output$text <- renderText({
       req(iv_r()$is_valid())
       req(iv_out$is_valid())
-      paste(utils::capture.output(summary(fitted()))[-1], collapse = "\n")
+      paste(utils::capture.output(summary(teal.code::dev_suppress(fitted())))[-1],
+        collapse = "\n"
+      )
     })
 
     teal.widgets::verbatim_popup_srv(

R/tm_g_scatterplot.R

@@ -911,7 +911,7 @@ srv_g_scatterplot <- function(id,
         validate(need(!input$add_density, "Brushing feature is currently not supported when plot has marginal density"))
       }
 
-      merged_data <- isolate(output_q()[["ANL"]])
+      merged_data <- isolate(teal.code::dev_suppress(output_q()[["ANL"]]))
 
       brushed_df <- teal.widgets::clean_brushedPoints(merged_data, plot_brush)
       numeric_cols <- names(brushed_df)[