bslib collapsed display (shiny app) appeared suddendly and can't be turned off since

shiny
, ,
1

Hello,

I have been encountering an issue with a "collapsed display" while developing shiny app with bslib package : it worked pretty well but suddendly started to dipslay only the collapsed form of page_navbar() and it can't be turned off.

Here is the basic regex example I found on the blsib doc page and even with this the issue still appears in viewer pane or window.


  library(shiny)
  library(bslib)
  
  link_shiny <- tags$a(
    shiny::icon("github"), "Shiny",
    href = "https://github.com/rstudio/shiny",
    target = "_blank"
  )
  link_posit <- tags$a(
    shiny::icon("r-project"), "Posit",
    href = "https://posit.co",
    target = "_blank"
  )
  
  ui <- page_navbar(
    collapsible = FALSE,
    title = "My App",
    nav_panel(title = "One", p("First page content.")),
    nav_panel(title = "Two", p("Second page content.")),
    nav_panel("Three", p("Third page content.")),
    nav_spacer(),
    nav_menu(
      title = "Links",
      align = "right",
      nav_item(link_shiny),
      nav_item(link_posit)
    )
  )
  
  server <- function(...) { } # not used in this example
  
  shinyApp(ui, server)