dm_from_con() and copy_dm_to() need dbplyr

cynkra · Aug 21, 2023 · b51438b · b51438b
1 parent f9a729d
commit b51438b
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 0 deletions.
diff --git a/R/db-interface.R b/R/db-interface.R
@@ -146,6 +146,8 @@ copy_dm_to <- function(dest, dm, ...,
     )
   }
 
+  check_suggested("dbplyr", use = TRUE)
+
   dest <- src_from_src_or_con(dest)
   src_names <- src_tbls_impl(dm)
 

diff --git a/R/dm_from_con.R b/R/dm_from_con.R
@@ -53,6 +53,8 @@ dm_from_con <- function(con = NULL, table_names = NULL, learn_keys = NULL,
                         .names = NULL, ...) {
   stopifnot(is(con, "DBIConnection") || inherits(con, "Pool"))
 
+  check_suggested("dbplyr", use = TRUE)
+
   if (inherits(con, "Pool")) {
     con <- pool_con <- pool::poolCheckout(con)
     on.exit(pool::poolReturn(pool_con))