In bs4Dash::box() ,Collapse button disappears when I maximize the box!

[alihdr]

Hi
It seems the collapse button in the box() has a problem: it disappears when the box is maximized.

Running this code, you can see when the box is maximized collapse button disappears:

box with id

if (interactive()) {
  library(shiny)
  library(bs4Dash)
  shinyApp(
    ui = dashboardPage(
      header = dashboardHeader(),
      body = dashboardBody(
        box(
          id = 'my_box',
          collapsible = TRUE,
          maximizable = T
        )
      ),
      sidebar = dashboardSidebar(disable = T)
    ),
    server = function(input, output, session) {}
     
  )
}

Surprisingly, when I drop id argument it works

box without id

if (interactive()) {
  library(shiny)
  library(bs4Dash)
  shinyApp(
    ui = dashboardPage(
      header = dashboardHeader(),
      body = dashboardBody(
        box(
          collapsible = TRUE,
          maximizable = T
        )
      ),
      sidebar = dashboardSidebar(disable = T)
    ),
    server = function(input, output, session) {}
     
  )
}

Thanks

[DivadNojnarg]

This is done on purpose. This does not make sense to collapse the box when it is maximised. Requested by many people. Closing.