Collapse simple lines.

jonthegeek · Oct 16, 2023 · 66ddc50 · 66ddc50
1 parent 2f1fbbc
commit 66ddc50
Showing 1 changed file with 5 additions and 15 deletions.
diff --git a/R/security.R b/R/security.R
@@ -3,10 +3,7 @@
   if (length(security_data)) {
     .bk_use_template(
       template = "020-security.R",
-      data = c(
-        security_data,
-        api_abbr = api_abbr
-      )
+      data = c(security_data, api_abbr = api_abbr)
     )
     security_data$security_signature <- .security_signature_generate(
       security_data$security_arg_names, api_abbr
@@ -16,17 +13,10 @@
 }
 
 .security_signature_generate <- function(security_arg_names, api_abbr) {
-  env_vars <- toupper(glue::glue(
-    "{api_abbr}_{security_arg_names}"
-  ))
+  env_vars <- toupper(glue::glue("{api_abbr}_{security_arg_names}"))
   return(
-    .collapse_comma_newline(
-      c(
-        "",
-        glue::glue(
-          "{security_arg_names} = Sys.getenv(\"{env_vars}\")"
-        )
-      )
-    )
+    .collapse_comma_newline(c("", glue::glue(
+      "{security_arg_names} = Sys.getenv(\"{env_vars}\")"
+    )))
   )
 }