Re-add recycling to new_styler_df()

krlmlr · krlmlr · commit 2f1df76b1a79 · 2023-04-17T20:24:49.000+02:00
diff --git a/R/utils.R b/R/utils.R
@@ -14,7 +14,7 @@ styler_df <- function(...) {
 #' @keywords internal
 #' @noRd
 new_styler_df <- function(x) {
-  vctrs::new_data_frame(x)
+  vctrs::data_frame(!!!x)
 }
 
 #' Ensure there is one (and only one) blank line at the end of a vector

Original file line number	Diff line number	Diff line change
`@@ -14,7 +14,7 @@ styler_df <- function(...) {`
`14`	`14`	`#' @keywords internal`
`15`	`15`	`#' @noRd`
`16`	`16`	`new_styler_df <- function(x) {`
`17`		`- vctrs::new_data_frame(x)`
	`17`	`+ vctrs::data_frame(!!!x)`
`18`	`18`	`}`
`19`	`19`
`20`	`20`	`#' Ensure there is one (and only one) blank line at the end of a vector`