This is an automated email from the ASF dual-hosted git repository.
jonkeane pushed a commit to branch main
in repository https://gitbox.apache.org/repos/asf/arrow.git
The following commit(s) were added to refs/heads/main by this push:
new c3ebdf500e MINOR: [R] add back `dplyr::` to `left_join` calls (#43348)
c3ebdf500e is described below
commit c3ebdf500e75ca868f50b7d374fc8ce2237756b8
Author: Jonathan Keane <[email protected]>
AuthorDate: Sat Jul 20 20:07:48 2024 -0500
MINOR: [R] add back `dplyr::` to `left_join` calls (#43348)
Necessary for a clean check. These were inadvertently taken out in #41576
and don't actually change any code, just appeases the static checker that CRAN
runs.
Authored-by: Jonathan Keane <[email protected]>
Signed-off-by: Jonathan Keane <[email protected]>
---
r/R/dplyr-mutate.R | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/r/R/dplyr-mutate.R b/r/R/dplyr-mutate.R
index fcb1cedbbb..03659f5735 100644
--- a/r/R/dplyr-mutate.R
+++ b/r/R/dplyr-mutate.R
@@ -77,12 +77,12 @@ mutate.arrow_dplyr_query <- function(.data,
agg_query$aggregations <- mask$.aggregations
agg_query <- collapse.arrow_dplyr_query(agg_query)
if (length(grv)) {
- out <- left_join(out, agg_query, by = grv)
+ out <- dplyr::left_join(out, agg_query, by = grv)
} else {
# If there are no group_by vars, add a scalar column to both and join
on that
agg_query$selected_columns[["..tempjoin"]] <- Expression$scalar(1L)
out$selected_columns[["..tempjoin"]] <- Expression$scalar(1L)
- out <- left_join(out, agg_query, by = "..tempjoin")
+ out <- dplyr::left_join(out, agg_query, by = "..tempjoin")
}
}