From e65cfff5ebfce7161cec8a6516ab9cdcbd995aee Mon Sep 17 00:00:00 2001
From: github-actions <41898282+github-actions[bot]@users.noreply.github.com>
Date: Wed, 4 Oct 2023 08:54:39 +0000
Subject: [PATCH] [skip actions] Restyle files

---
 R/tm_missing_data.R | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/R/tm_missing_data.R b/R/tm_missing_data.R
index 5c2d0727c..205cf3a03 100644
--- a/R/tm_missing_data.R
+++ b/R/tm_missing_data.R
@@ -1205,9 +1205,11 @@ srv_missing_data <- function(id, data, reporter, filter_panel_api, dataname, par
         sum_type <- input$summary_type
         title <- if (sum_type == "By Variable Levels") paste0(sum_type, " Table") else paste0(sum_type, " Plot")
         title_dataname <- paste(title, dataname, sep = " - ")
-        label <- if (label == "")  {
+        label <- if (label == "") {
           paste("Missing Data", sum_type, dataname, sep = " - ")
-        } else { label }
+        } else {
+          label
+        }
         card$set_name(label)
         card$append_text(title_dataname, "header2")
         if (with_filter) card$append_fs(filter_panel_api$get_filter_state())