shinyDND with uiOutput not working

Question

I am attempting to use shinyDND from the server side using uiOuput, renderUI and dragUI but the divs created are not draggable. Example:

  library(shiny)
  library(shinyDND)

  ui <- shinyUI(
    mainPanel(
      uiOutput("myUI"),
      dragUI("works","works")

    )
  )

  server = shinyServer(function(input, output,session) {
    output$myUI <- renderUI({
      dragUI("doesntwork","doesntwork")
    })
  })

  # Run the application 
  shinyApp(ui = ui, server = server)

The dragUI element being created within the renderUI function is visible but not draggable. The dragUI element in the ui function is fine.

Any ideas?

related: https://stackoverflow.com/questions/53283202/how-to-refer-to-reactive-element-in-ui-r-in-shiny — Stéphane Laurent, Nov 16 '18 at 14:11

score 1 · Answer 1 · answered Jun 29 '16 at 20:40

1

This was a bug and has since been fixed

answered Jun 29 '16 at 20:40

MrHopko

879
1
7
16

Is this a working answer to your question? I mean, I know that is not. And as such, it should not be written as an answer. It should be added to the question in an edit – Roman Marusyk Jun 29 '16 at 21:21

shinyDND with uiOutput not working

1 Answers1