navbar_light_color not updating

[gacolitti]

I expect the navbar to be black in the following example.

library(shiny)
library(bs4Dash)
library(fresh)

theme <-  create_theme(
  bs4dash_vars(
    navbar_light_color = "#000000"
  )
)

ui <- dashboardPage(
  dashboardHeader(title = "Basic dashboard"),
  dashboardSidebar(),
  dashboardBody(use_theme(theme))
)

server <- function(input, output) {
}

shinyApp(ui, server)

[pvictor]

Hello,

navbar_light_color alter the text color, background color is defined by the navbar's status (default is white). Here's an example:

library(shiny)
library(bs4Dash)
library(fresh)

theme <-  create_theme(
  bs4dash_vars(
    navbar_light_color = "red"
  ),
  bs4dash_color(white = "yellow")
)

ui <- dashboardPage(
  dashboardHeader(title = "Basic dashboard", status = "white"),
  dashboardSidebar(),
  dashboardBody(use_theme(theme))
)

server <- function(input, output) {
}

shinyApp(ui, server)

Note that the "white" status is used in many other places.

Victor