buttonInput has different result than actionButton in trigger of modal inputs

[zross]

There may be a reason for this (?) but it seems odd that if I use actionButton the select in the modal is triggered the way I would expect but if I use buttonInput none of the changes to the select are triggered.

cc @phoward38

library(shiny)

ui <- fluidPage(
  actionButton('a', "Click me")
  #yonder::buttonInput('a', "Click me")
)

server <- function(input, output, session) {
  
  ns <- NS("dc")
  
  sel <- reactiveVal('b')

  observeEvent(input$a, {
    shiny::showModal(
      shiny::modalDialog(
        shiny::selectInput(
          inputId = 'abc',
          'label',
          choices = c("a", "b", "c"),
          selected = sel()
        )
      )
    )

  })
  
  observeEvent(input$abc, {
    message(input$abc)
    sel(input$abc)
  })
  
}

shinyApp(ui, server)

[nteetor]

Using the example provided above I didn't notice any difference in behaviour changing between the yonder button and the shiny action button.

Using the yonder button, the modal wasn't opening up? Only the select input wasn't updated?