radiobarInput not triggering observe (selectInput is fine)

[zross]

@nteetor I'm finding that the radiobarInput is not triggering an observe in the way I would expect. In the minimal example below, when you click on the button you'll see that the change to the select input is registered but not the change to the radiobar. The yonder::selectInput and the shiny::selectInput both work fine.

Any ideas why this might be?

library(shiny)
library(yonder)

ui <- fluidPage(
 
  list(
    yonder::radiobarInput(
      id = "yonder",
      label = "Yonder input",
      choices = c("a", "b", "c"),
      values = c("a", "b", "c"),
      selected = "b"
    ),
    shiny::selectInput(
      inputId = "shiny",
      label = "Shiny input",
      choices = c("x", "y", "z"),
      selected = "y"
    ),
    shiny::actionButton("button", "Click me!")
  )

)

server <- function(input, output, session) {
 
  observeEvent(input$button, {
    yonder::updateRadiobarInput(
      id = "yonder",
      selected = "c"
    )
   
    shiny::updateSelectInput(
      inputId = "shiny",
      selected = "z"
    )
  }, ignoreInit = TRUE)
 
  observeEvent(input$yonder, {
    message("radio updated to value ", input$yonder)
  }, ignoreInit = TRUE)
 
  observeEvent(input$shiny, {
    message("select updated ", input$shiny)
  }, ignoreInit = TRUE)
 
}

shinyApp(ui, server)