Skip to content
GitLab
Projects Groups Topics Snippets
  • /
  • Help
    • Help
    • Support
    • Community forum
    • Submit feedback
    • Contribute to GitLab
  • Sign in
  • airGRteaching airGRteaching
  • Project information
    • Project information
    • Activity
    • Labels
    • Members
  • Repository
    • Repository
    • Files
    • Commits
    • Branches
    • Tags
    • Contributor statistics
    • Graph
    • Compare revisions
  • Issues 7
    • Issues 7
    • List
    • Boards
    • Service Desk
    • Milestones
  • Redmine
    • Redmine
  • Merge requests 0
    • Merge requests 0
  • CI/CD
    • CI/CD
    • Pipelines
    • Jobs
    • Schedules
  • Deployments
    • Deployments
    • Environments
    • Releases
  • Packages and registries
    • Packages and registries
    • Container Registry
  • Monitor
    • Monitor
    • Incidents
  • Analytics
    • Analytics
    • Value stream
    • CI/CD
    • Repository
  • Wiki
    • Wiki
  • Snippets
    • Snippets
  • Activity
  • Graph
  • Create a new issue
  • Jobs
  • Commits
  • Issue Boards
Collapse sidebar

La forge gitlab.irstea.fr sera définitivement arrêtée le 30 juin 2026. Nous vous invitons à migrer vos projets vers la forge INRAE. Vous trouverez plus de détails sur le blog de la forge INRAE.

  • HYCAR-HydroHYCAR-Hydro
  • airGRteachingairGRteaching
  • Issues
  • #11
Closed
Open
Issue created Mar 27, 2020 by Delaigue Olivier@olivier.delaigueOwner

Remove fake item containing an external hyperlink in a navbar menu

In a dropdown menu, there is a blank line (a fake item) above each item containing a <a> tag. I don't know how to remove it. I tested several solutions but nothing worked. @benoit.genot any idea?

An example where the problem appears above items 3 and 4.

library(shiny)

ui <- navbarPage("Navbar", 
                 theme = shinytheme("flatly"),
                 navbarMenu(title = "Dropdown menu",
                            tabPanel(title = "Item 1"),
                            tabPanel(title = "Item 2"),
                            tabPanel(title = a("Item 3", href = "https://google.com")),
                            tabPanel(title = HTML("<a href='https://google.com'>Item 4</a>")),
                            tabPanel(title = HTML("Item 5")),
                            tabPanel(title = "Item 6")
                 )
)

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

shinyApp(ui, server)
Assignee
Assign to
Time tracking