Apply suggestions from code review

DavisVaughan · github-actions[bot] · web-flow · commit 82be09becf68 · 2025-07-23T16:03:23.000-04:00
Co-authored-by: github-actions[bot] &lt;41898282+github-actions[bot]@users.noreply.github.com&gt;
diff --git a/R/across.R b/R/across.R
@@ -236,8 +236,7 @@ across <- function(.cols, .fns, ..., .names = NULL, .unpack = FALSE) {
     stop_input_type(.unpack, "`TRUE`, `FALSE`, or a single string")
   }
 
-  if (
-    is_string(.unpack)) {
+  if (is_string(.unpack)) {
     unpack_spec <- .unpack
     .unpack <- TRUE
   } else {
diff --git a/R/bind-cols.R b/R/bind-cols.R
@@ -31,7 +31,9 @@ bind_cols <- function(
   dots <- list2(...)
 
   dots <- list_flatten(
-    dots, recursive = TRUE)
+    dots,
+    recursive = TRUE
+  )
   dots <- discard(dots, is.null)
 
   # Strip names off of data frame components so that vec_cbind() unpacks them

Original file line number	Diff line number	Diff line change
`@@ -236,8 +236,7 @@ across <- function(.cols, .fns, ..., .names = NULL, .unpack = FALSE) {`
`236`	`236`	stop_input_type(.unpack, "`TRUE`, `FALSE`, or a single string")
`237`	`237`	`}`
`238`	`238`
`239`		`- if (`
`240`		`- is_string(.unpack)) {`
	`239`	`+ if (is_string(.unpack)) {`
`241`	`240`	`unpack_spec <- .unpack`
`242`	`241`	`.unpack <- TRUE`
`243`	`242`	`} else {`