diff --git a/R/drop_diseasystore.R b/R/drop_diseasystore.R index e729153b..fc665795 100644 --- a/R/drop_diseasystore.R +++ b/R/drop_diseasystore.R @@ -105,8 +105,7 @@ drop_diseasystore <- function(pattern = NULL, # Check if logs is in the table, if yes, all tables must be deleted - if ("logs" %in% tables_to_delete$table && - !identical(dplyr::select(tables_to_delete, !"db_table_id"), SCDB::get_tables(conn, ds_context))) { + if ("logs" %in% tables_to_delete$table && !identical(tables_to_delete, SCDB::get_tables(conn, ds_context))) { stop(glue::glue("'{schema}.logs' set to delete. Can only delete if entire feature store is dropped.")) }