From f94a5908c127856f650b778304306065d28b327e Mon Sep 17 00:00:00 2001 From: pvictor Date: Thu, 6 Jan 2022 14:56:01 +0100 Subject: [PATCH] downloadBttn: bug arg icon --- R/actionBttn.R | 2 +- examples/downloadBttn.R | 3 ++- man/downloadBttn.Rd | 2 +- 3 files changed, 4 insertions(+), 3 deletions(-) diff --git a/R/actionBttn.R b/R/actionBttn.R index 363b6bbf..97a17be2 100644 --- a/R/actionBttn.R +++ b/R/actionBttn.R @@ -149,7 +149,7 @@ downloadBttn <- function(outputId, size = "md", block = FALSE, no_outline = TRUE, - icon = icon("download")) { + icon = shiny::icon("download")) { bttn <- actionBttn( inputId = paste0(outputId, "_bttn"), label = tagList( diff --git a/examples/downloadBttn.R b/examples/downloadBttn.R index 71e4a391..bfdb8446 100644 --- a/examples/downloadBttn.R +++ b/examples/downloadBttn.R @@ -13,7 +13,8 @@ ui <- fluidPage( downloadBttn( outputId = "downloadData2", style = "simple", - color = "primary" + color = "primary", + icon = icon("file-pdf") ), tags$br(), tags$br(), downloadBttn( diff --git a/man/downloadBttn.Rd b/man/downloadBttn.Rd index ed85e54f..47ca78a9 100644 --- a/man/downloadBttn.Rd +++ b/man/downloadBttn.Rd @@ -12,7 +12,7 @@ downloadBttn( size = "md", block = FALSE, no_outline = TRUE, - icon = icon("download") + icon = shiny::icon("download") ) } \arguments{