Header of Box with Label is Taller than Equivalent Box without Label

[ApexHeel]

Issue: If two boxes are equivalent and one has a label and the other does not, the header of one with is slightly taller than the other.

Expected behavior: Boxes with headers should always be equivalent height.

Example code:

library(bs4Dash)
ui <- dashboardPage(
  dashboardHeader(title = "Basic dashboard"),
  dashboardSidebar(),
  dashboardBody(
    # Boxes need to be put in a row (or column)
    fluidRow(
      box(title = "Temp", status = "primary", solidHeader = TRUE, collapsible = FALSE,
          label = boxLabel("23", status = "info", tooltip = NULL),
          p("Nothing")),
      
      box(title = "Controls", status = "primary", solidHeader = TRUE, collapsible = FALSE, 
          p("Nothing")
      )
    )
  )
)

server <- function(input, output) {

}

shinyApp(ui, server)