Make the current tag behave like an action button

Make current tag behave like an action button.

Usage

make_action_button(tag, inputId = NULL)

Arguments

tag

Any compatible tag.

inputId

Unique id. This will host the input value to be used on the server side.

Value

The modified tag with an extra id and the action button class.

Details

Only works with compatible tags like button or links

See also

Other golem: enurl(), is_shiny.tag(), jq_hide(), list_to_li(), list_to_p(), rep_br(), tagRemoveAttributes(), undisplay(), with_red_star()

Other ui: acc_list(), add_sass(), box_list(), bs4Alert(), bs_extract_status(), bs_statuses, col_10(), col_11(), col_12(), col_1(), col_2(), col_3(), col_4(), col_5(), col_6(), col_7(), col_8(), col_9(), col_auto(), copyright(), css_props(), dynamic_row(), enurl(), fa_arrow_icon(), icon_sb(), infoIcon(), jq_hide(), list_to_li(), list_to_p(), make_columns(), rep_br(), tagRemoveAttributes(), ui_row(), ui_tabs(), undisplay(), with_red_star()

Examples

if (FALSE) {
if (interactive()) {
 library(shiny)

 link <- a(href = "#", "My super link", style = "color: lightblue;")

 ui <- fluidPage(
  make_action_button(link, inputId = "mylink")
 )

 server <- function(input, output, session) {
   observeEvent(input$mylink, {
    showNotification("Pouic!")
   })
 }

 shinyApp(ui, server)

}
}