set_roles: Add role attributes
In leonawicz/shinyaccess: Web Accessibility in Shiny

Description Usage Arguments Details Value Examples

View source: R/attributes.R

Add role language attribute to key Shiny widgets.

1	set_roles(session)

session

Shiny session.

You can inspect the element in your browser to verify the addition of role attributes for the following Shiny elements.

tabsetPanel
tabPanel

nothing returned

if(interactive()){
  library(shiny)

  shinyApp(
    ui = fluidPage(
      use_access(),
      h3("App title"),
      tabsetPanel(
        tabPanel("panel1", "Content"),
        tabPanel("panel2", "Content")
      ),
      tabsetPanel(
        tabPanel("panel1", "Content"),
        tabPanel("panel2", "Content"),
        type = "pills", id = "tsp2"
      )
    ),
    server = function(input, output, session){
      set_roles(session)
    }
  )
}