inst/shiny-squid/source/utilities/actionButton2.R

# create an icon into input label
actionButton2 <- function (inputId, label, icon = NULL, ...) 
{
  tags$button(id = inputId, type = "button", class = "btn action-button btn-primary", 
              list(icon, label))
}
Haycen/SQUID documentation built on May 8, 2017, 2:54 p.m.