simplify libraries call in tm_outliers

Author: m7pr

R/tm_outliers.R

@@ -456,11 +456,8 @@ srv_outliers <- function(id, data, outlier_var,
       req(anl_merged_input())
       teal.code::eval_code(
         data_obj(),
-        paste0(
-          'library("dplyr");library("tidyr");', # nolint: quotes.
-          'library("tibble");library("ggplot2");'
-        )
-      ) %>% # nolint: quotes.
+        expression(library("dplyr"), library("tidyr"), library("tibble"), library("ggplot2"))
+      ) %>%
         teal.code::eval_code(as.expression(anl_merged_input()$expr))
     })