what happens ? you get Null ?
library(shiny)
library(shinyjqui)
server <- function(input, output) {
output$order <- renderPrint({input$foo_order})
}
ui <- fluidPage(
orderInput(inputId = 'foo', label = 'A simple example', items = c('A', 'B', 'C')),
verbatimTextOutput('order')
)
shinyApp(ui, server)