Bootstrap states variables — bs_vars

Those variables can be used to customize states colors (used for alerts or panels) in Bootstrap and Bootswatch themes.

bs_vars_state(
  success_text = NULL,
  success_bg = NULL,
  success_border = NULL,
  info_text = NULL,
  info_bg = NULL,
  info_border = NULL,
  warning_text = NULL,
  warning_bg = NULL,
  warning_border = NULL,
  danger_text = NULL,
  danger_bg = NULL,
  danger_border = NULL
)

Arguments

success_text: Success text color.
success_bg: Success background color.
success_border: Success border color.
info_text: Info text color.
info_bg: Info background color.
info_border: Info border color.
warning_text: Warning text color.
warning_bg: Warning background color.
warning_border: Warning border color.
danger_text: Danger text color.
danger_bg: Danger background color.
danger_border: Danger border color.

Value

a list that can be used in create_theme.

Note

See default parameters for Bootstrap: https://getbootstrap.com/docs/3.4/customize/.

Examples

# Panels & alerts colors
bs_vars_state(
  success_text = "#FFF",
  success_bg = "#238B45",
  success_border = "#00441B"
)
#> $`state-success-text`
#> [1] "#FFF"
#> 
#> $`state-success-bg`
#> [1] "#238B45"
#> 
#> $`state-success-border`
#> [1] "#00441B"
#> 
#> attr(,"class")
#> [1] "fresh_sass_vars" "bootstrap_vars"  "list"           

if (interactive()) {
  library(shiny)
  library(shinyWidgets)
  library(fresh)

  ui <- fluidPage(

    use_theme(create_theme(
      theme = "default",
      bs_vars_state(
        success_text = "#FFF",
        success_bg = "#238B45",
        success_border = "#00441B"
      )
    )),

    tags$h1("State variables"),
    fluidRow(
      column(
        width = 6,
        tags$div(
          class = "alert alert-success",
          tags$b("Alert!"), "this is an alert !"
        )
      ),
      column(
        width = 6,
        panel(
          status = "success",
          "This is a panel"
        )
      )
    )
  )

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

  }

  shinyApp(ui, server)
}