chore: remove redundant line breaks

Author: vedhav

R/tm_a_pca.R

@@ -236,7 +236,6 @@ ui_a_pca <- function(id, ...) {
       encoding = tags$div(
         ### Reporter
         teal.reporter::add_card_button_ui(ns("add_reporter"), label = "Add Report Card"),
-        tags$br(), tags$br(),
         ###
         tags$label("Encodings", class = "text-primary"),
         teal.transform::datanames_input(args["dat"]),

R/tm_a_regression.R

@@ -287,7 +287,6 @@ ui_a_regression <- function(id, ...) {
     encoding = tags$div(
       ### Reporter
       teal.reporter::add_card_button_ui(ns("add_reporter"), label = "Add Report Card"),
-      tags$br(), tags$br(),
       ###
       tags$label("Encodings", class = "text-primary"), tags$br(),
       teal.transform::datanames_input(args[c("response", "regressor")]),

R/tm_data_table.R

@@ -158,7 +158,6 @@ ui_page_data_table <- function(id, pre_output = NULL, post_output = NULL) {
   ns <- NS(id)
 
   tagList(
-    include_css_files("custom"),
     teal.widgets::standard_layout(
       output = teal.widgets::white_small_well(
         bslib::page_fluid(

R/tm_g_association.R

@@ -234,7 +234,6 @@ ui_tm_g_association <- function(id, ...) {
     encoding = tags$div(
       ### Reporter
       teal.reporter::add_card_button_ui(ns("add_reporter"), label = "Add Report Card"),
-      tags$br(), tags$br(),
       ###
       tags$label("Encodings", class = "text-primary"),
       teal.transform::datanames_input(args[c("ref", "vars")]),

R/tm_g_bivariate.R

@@ -341,7 +341,6 @@ ui_g_bivariate <- function(id, ...) {
     encoding = tags$div(
       ### Reporter
       teal.reporter::add_card_button_ui(ns("add_reporter"), label = "Add Report Card"),
-      tags$br(), tags$br(),
       ###
       tags$label("Encodings", class = "text-primary"),
       teal.transform::datanames_input(args[c("x", "y", "row_facet", "col_facet", "color", "fill", "size")]),

R/tm_g_distribution.R

@@ -260,7 +260,6 @@ ui_distribution <- function(id, ...) {
     encoding = tags$div(
       ### Reporter
       teal.reporter::add_card_button_ui(ns("add_reporter"), label = "Add Report Card"),
-      tags$br(), tags$br(),
       ###
       tags$label("Encodings", class = "text-primary"),
       teal.transform::datanames_input(args[c("dist_var", "strata_var")]),

R/tm_g_response.R

@@ -265,7 +265,6 @@ ui_g_response <- function(id, ...) {
     encoding = tags$div(
       ### Reporter
       teal.reporter::add_card_button_ui(ns("add_reporter"), label = "Add Report Card"),
-      tags$br(), tags$br(),
       ###
       tags$label("Encodings", class = "text-primary"),
       teal.transform::datanames_input(args[c("response", "x", "row_facet", "col_facet")]),

R/tm_g_scatterplot.R

@@ -372,7 +372,6 @@ ui_g_scatterplot <- function(id, ...) {
       encoding = tags$div(
         ### Reporter
         teal.reporter::add_card_button_ui(ns("add_reporter"), label = "Add Report Card"),
-        tags$br(), tags$br(),
         ###
         tags$label("Encodings", class = "text-primary"),
         teal.transform::datanames_input(args[c("x", "y", "color_by", "size_by", "row_facet", "col_facet")]),

R/tm_g_scatterplotmatrix.R

@@ -253,7 +253,6 @@ ui_g_scatterplotmatrix <- function(id, ...) {
     encoding = tags$div(
       ### Reporter
       teal.reporter::add_card_button_ui(ns("add_reporter"), label = "Add Report Card"),
-      tags$br(), tags$br(),
       ###
       tags$label("Encodings", class = "text-primary"),
       teal.transform::datanames_input(args$variables),

R/tm_missing_data.R

@@ -361,7 +361,6 @@ encoding_missing_data <- function(id, summary_per_patient = FALSE, ggtheme, data
   tagList(
     ### Reporter
     teal.reporter::add_card_button_ui(ns("add_reporter"), label = "Add Report Card"),
-    tags$br(), tags$br(),
     ###
     tags$label("Encodings", class = "text-primary"),
     helpText(