Commit b019731b authored by mahendra-mariadassou's avatar mahendra-mariadassou
Browse files

Make manual updates silent

parent 2dac6e4e
......@@ -79,11 +79,11 @@ app_server <- function(input, output, session) {
## Allow manual corrections
observeEvent(input$table_cell_edit, {
info = input$table_cell_edit
str(info)
i = info$row
j = info$col
v = info$value
# info = input$table_cell_edit
# str(info)
# i = info$row
# j = info$col
# v = info$value
otu$current_aff <<- editData(otu$current_aff, input$table_cell_edit, "table")
})
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment