Keep bind_rows() where needed for now

krlmlr · krlmlr · commit 8b8a81e78fd8 · 2023-04-17T16:21:43.000+02:00
diff --git a/R/rules-tokens.R b/R/rules-tokens.R
@@ -51,7 +51,10 @@ add_brackets_in_pipe_one <- function(pd, pos) {
       block = NA,
       is_cached = FALSE
     )
-    pd$child[[next_non_comment]] <- vec_rbind(pd$child[[next_non_comment]], new_pd) %>%
+    pd$child[[next_non_comment]] <- bind_rows(
+      pd$child[[next_non_comment]],
+      new_pd
+    ) %>%
       arrange_pos_id()
   }
   pd

Original file line number	Diff line number	Diff line change
`@@ -51,7 +51,10 @@ add_brackets_in_pipe_one <- function(pd, pos) {`
`51`	`51`	`block = NA,`
`52`	`52`	`is_cached = FALSE`
`53`	`53`	`)`
`54`		`- pd$child[[next_non_comment]] <- vec_rbind(pd$child[[next_non_comment]], new_pd) %>%`
	`54`	`+ pd$child[[next_non_comment]] <- bind_rows(`
	`55`	`+ pd$child[[next_non_comment]],`
	`56`	`+ new_pd`
	`57`	`+ ) %>%`
`55`	`58`	`arrange_pos_id()`
`56`	`59`	`}`
`57`	`60`	`pd`