Avoid multidplyr failure, see tidyverse/multidplyr#146

mkoohafkan · Mar 21, 2023 · 8ee46e6 · 8ee46e6
1 parent 3632123
commit 8ee46e6
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/copy-to.R b/R/copy-to.R
@@ -48,7 +48,7 @@ auto_copy <- function(x, y, copy = FALSE, ...) {
 
   if (!copy) {
     bullets <- c(
-      "`x` and `y` must share the same source.",
+      "`x` and `y` must share the same src.",
       i = cli::format_inline("`x` is {obj_type_friendly(x)}."),
       i = cli::format_inline("`y` is {obj_type_friendly(y)}."),
       i = "Set `copy = TRUE` if `y` can be copied to the same source as `x` (may be slow)."

diff --git a/tests/testthat/_snaps/copy-to.md b/tests/testthat/_snaps/copy-to.md
@@ -4,7 +4,7 @@
       auto_copy(df, NULL)
     Condition
       Error in `auto_copy()`:
-      ! `x` and `y` must share the same source.
+      ! `x` and `y` must share the same src.
       i `x` is a <tbl_df/tbl/data.frame> object.
       i `y` is `NULL`.
       i Set `copy = TRUE` if `y` can be copied to the same source as `x` (may be slow).