R/dwld_button_app.R

In mhanf/multiplyR: Allows Kids (And Adults) To Play With Multiplication Tables And Their Graphical Representations

#' wrapper of downloadButton to suppress btn-default
#'
#' @param ... parameters of downloadButton
#' @import shiny
#' @import htmltools
#' @return a download button without btn-default
#' @export

dwld_button_app <- function(...){
  button <- htmltools::tagQuery(shiny::downloadButton(...))$
    removeClass("btn-default")$
    allTags()
}