Pass .data directly to eval_rename()

tidyverse · Oct 14, 2022 · 4e523de · 4e523de
1 parent 6d29fb3
commit 4e523de
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/R/step-call.R b/R/step-call.R
@@ -71,8 +71,7 @@ tail.dtplyr_step <- function(x, n = 6L, ...) {
 #' dt %>% rename(new_x = x, new_y = y)
 #' dt %>% rename_with(toupper)
 rename.dtplyr_step <- function(.data, ...) {
-  sim_data <- simulate_vars(.data)
-  locs <- tidyselect::eval_rename(expr(c(...)), sim_data)
+  locs <- tidyselect::eval_rename(expr(c(...)), .data)
 
   step_setnames(.data, .data$vars[locs], names(locs), in_place = TRUE, rename_groups = TRUE)
 }