allow HTML tags inside popover()

[lgnbhl]

Is it possible to add html tags inside popover()?

Reproducible example

library(shiny)
library(bs4Dash)

shinyApp(
  ui = dashboardPage(
    help = TRUE,
    header = dashboardHeader(),
    sidebar = dashboardSidebar(),
    controlbar = dashboardControlbar(),
    footer = dashboardFooter(),
    title = "Popover UI",
    body = dashboardBody(
      popover(
        actionButton("goButton", "Click me to see the popover!"),
        title = "My popover",
        placement = "right",
        # html = TRUE # POSSIBLE ARGUMENT TO ADD
        content = "Lorem <a target=_blank href='https://github.com/RinteRface'>ipsum</a>."
      )
    )
  ),
  server = function(input, output) {}
)

Maybe an argument could be added in popover(), such as html = TRUE, or something similar (as I saw you implemented it for tooltips in ShinyWidgets: https://rdrr.io/cran/shinyWidgets/man/tooltipOptions.html).