updatebs4Controlbar not working on 0.6.0.9000

[dwhdai]

Minimal example:

if (interactive()) {
    library(shiny)
    library(bs4Dash)
    
    shinyApp(
        ui = dashboardPage(
            controlbar_collapsed = TRUE,
            controlbar_overlay = TRUE,
            navbar = dashboardHeader(),
            sidebar = dashboardSidebar(),
            body = dashboardBody(
                actionButton(inputId = "toggle", label = "Toggle Controlbar"),
            ),
            controlbar = dashboardControlbar(inputId = "controlbar")
        ),
        server = function(input, output, session) {
            
            observeEvent(input$toggle, {
                updatebs4Controlbar(inputId = "controlbar", session = session)
            })
            
            observe({
                message(input$toggle)
            })
        }
    )
}

This is working on 0.5.0. Tested on Windows 10, shiny 1.4.0.2