jqui_sortable order overwritten by selectizeInput drag and drop

[Giovanni Colitti]

The order inside jqui_sortable() is lost when dragging and dropping choices for selectizeInput().

Here is a reproducible example:

library(shiny)
library(shinyjqui)

ui <- fluidPage(
      jqui_sortable(
        div(id = "lst",
        selectizeInput("c", "Select", c("a", "b"),
                       multiple = TRUE,
                       options = list(plugins = list('drag_drop')))
      )
  ),
  br(),
  br(),
  br(),
  verbatimTextOutput("lst_order")
)

server <- function(input, output, session) {
  
  output$lst_order <- renderPrint({
    str(input$lst_order$id)
  })
  
}

shinyApp(ui, server)

What is causing this? Is there any way to avoid this behavior?

[Yang Tang]

This is a bug. The drag_drop plugin of selectizeInput() is also based on jquery-ui. When you do the drag and drop inside the selectizeInput, it will trigger the same js event that causes jqui_sortable to react on it. It has been fixed now with 78a54b6