R/app_ui.R

In poissonconsulting/apptemplate: What the Package Does (One Line, Title Case)

app_ui <- function() {
  tagList(
    shinyutils::css_navbar(text_selected_color = "#07A8FF"),
    shinyjs::useShinyjs(),
    navbarPage(title =  "apptemplate", 
               selected = 'module',
               tabPanel(title = 'module',
                        br(),
                        mod_module_ui("module_ui_1")),
               tabPanel(title = 'About',
                        br(),
                        shinyutils::mod_about_ui("about_ui_1", 
                                                 package = "apptemplate", 
                                                 citation = tagList(p("")),
                                                 footer = tagList(p("Developed by Poisson Consulting Ltd."))))
               )
    )
}