Allow {bsicons} for icon argument to nav_panel

[chrisbrownlie]

In a {shiny} app I'm working on, we're trying to stick to using Bootstrap icons over e.g. font-awesome, for consistency. I've noticed that it isn't possible to pass to bsicons::bs_icon() directly to the icon argument of nav_panel(). This is because the internal prepTabIcon() function checks that the icon is a shiny.tag, which bs_icon()s are not.

There is a fairly easy workaround with wrapping it like tags$i(bsicons::bs_icon()), but I think if its possible and easy to implement, allowing bsicons::bs_icon() to be used as a drop-in replacement for shiny::icon() would be useful, especially as the tags$i() workaround isn't immediately obvious (or at least wasn't to me). Thanks!

Minimal example - throws an error when creating the UI:

library(shiny)
library(bslib)
library(bsicons)

ui <- fluidPage(
  page_fluid(
    navset_tab(
      nav_panel(
        title = "First",
        icon = bs_icon("gear") # icon("gear") would work here
      )
    )
  )
)

server <- function(input, output, session) {
  
}

shinyApp(ui, server)

[github-actions]

This issue has been automatically locked. If you have found a related problem, please open a new issue (with a reproducible example or feature request) and link to this issue.
🙋 Need help? Connect with us on Discord or Posit Community.