Extra white line in selectInput

[bklingen]

When choices in selectInput go over two or more lines, an extra white line is added. If the choice is selected again, the white line goes away. (Tested in RStudio Viewer and on Chrome.)

library(shiny)
ui <- fluidPage(
  sidebarLayout(
    sidebarPanel(
      selectInput("a", "Extra line is added:", 
                  "A very long text where Shiny seems to add an extra line at the end. But once selected again, the extra white line goes away!")    
             ),
    mainPanel(
      h4("Click on the selection, select it again and the extra white line will go away")
    )
  )
)
server <- function(input, output) {}
shinyApp(ui = ui, server = server)

Screenshot at start-up:

Screenshot after selecting:

This is sometime a bit annoying when space is tight (i.e., multiple selectInputs). I would prefer no extra white space at start-up.

Thanks,
Bernhard

[JT-39]

Does anyone have a workaround for this?