remove modal before update table

dreamRs · Jan 8, 2024 · baa1025 · baa1025
1 parent e2ec08d
commit baa1025
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/edit-data.R b/R/edit-data.R
@@ -340,8 +340,8 @@ edit_data_server <- function(id,
           if (isTruthy(res_callback) & !isTRUE(only_callback)) {
             data_updated <- data_updated[order(.datamods_id)]
             data_rv$data <- copy(data_updated)
-            update_table(data_updated, data_rv$colnames)
             removeModal()
+            update_table(data_updated, data_rv$colnames)
           } else {
             NULL
           }
@@ -401,8 +401,8 @@ edit_data_server <- function(id,
             data <- data[.datamods_id != input$delete]
             data <- data[order(.datamods_id)]
             data_rv$data <- data
-            update_table(data, data_rv$colnames)
             removeModal()
+            update_table(data, data_rv$colnames)
           } else {
             NULL
           }