inst/source/tabs/tab3/ui.R

In ShinyWizard: An Interactive Wizard to Design, Build, and Deploy R Packages Demo Presentation

# --- Navigation ---
# TabName: Tabs
# TabIcon: file

# --- Next/Prev buttons
# ShowButtons: TRUE
# ButtonsAlignment: center

# --- Info ---
# InfoTitle: tir
# InfoMessage: mes


fluidPage(
  fluidRow(
    actionButton(ns("newTab"), "Add", icon = icon("plus")),
    actionButton(ns("removeTab"), "Remove", icon = icon("minus")),
    actionButton(ns("saveTabs"), "Save", icon = icon("floppy-disk")),
    actionButton(ns("runTabs"), "Run", icon = icon("play"))
  ),
  tags$br(),
  tabsetPanel(id=ns("EditTabs"), type="pills"),
  
  verbatimTextOutput(outputId = ns("result"))
)