remove unused arrange()

r-lib · May 23, 2024 · 9e9d8ec · 9e9d8ec
1 parent cb6f544
commit 9e9d8ec
Showing 1 changed file with 0 additions and 6 deletions.
diff --git a/R/compat-dplyr.R b/R/compat-dplyr.R
@@ -10,12 +10,6 @@ lead <- function(x, n = 1L, default = NA) {
   c(x[-seq_len(n)], rep(default, n))
 }
 
-
-arrange <- function(.data, ...) {
-  ord <- eval(substitute(order(...)), .data, parent.frame())
-  vec_slice(.data, ord)
-}
-
 arrange_pos_id <- function(data) {
   pos_id <- data$pos_id
   if (is.unsorted(pos_id)) {