Fix oopsies

openpharma · Nov 21, 2024 · ad3f05e · ad3f05e
1 parent 7e26f83
commit ad3f05e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/fct_SQLite.R b/R/fct_SQLite.R
@@ -335,7 +335,7 @@ db_save_review <- function(
     table = "all_review_data"
 ){
   stopifnot(is.data.frame(rv_records))
-  stopifnot(is.character(table) && length(table) != 1)
+  stopifnot(is.character(table) && length(table) == 1)
   if (any(duplicated(rv_records[["id"]]))) {
     warning("duplicate records detected to save in database. Only the first will be selected.")
     rv_records <- rv_records[!duplicated(rv_records[["id"]]),]