Update engine.R

also return data ("scalar numeric that specifies the number of rows affected") in case of an is_sql_update_query, and not just SELECT-like queries
edalfon · Sep 24, 2021 · f78e1c6 · f78e1c6
1 parent 6c402de
commit f78e1c6
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/engine.R b/R/engine.R
@@ -555,8 +555,8 @@ eng_sql = function(options) {
 
   data = tryCatch({
     if (is_sql_update_query(query)) {
-      DBI::dbExecute(conn, query)
-      NULL
+      data = DBI::dbExecute(conn, query)
+      data
     } else if (is.null(varname) && max.print > 0) {
       # execute query -- when we are printing with an enforced max.print we
       # use dbFetch so as to only pull down the required number of records