mirror of
https://github.com/agdamsbo/FreesearchR.git
synced 2026-06-19 12:37:30 +02:00
This commit is contained in:
parent
13df57fbb1
commit
a06177481b
35 changed files with 459 additions and 435 deletions
|
|
@ -105,7 +105,7 @@ create_column_ui <- function(id) {
|
|||
actionButton(
|
||||
inputId = ns("compute"),
|
||||
label = tagList(
|
||||
phosphoricons::ph("gear"), i18n$t("Create column")
|
||||
phosphoricons::ph("pencil"), i18n$t("Create column")
|
||||
),
|
||||
class = "btn-outline-primary",
|
||||
width = "100%"
|
||||
|
|
@ -113,7 +113,8 @@ create_column_ui <- function(id) {
|
|||
actionButton(
|
||||
inputId = ns("remove"),
|
||||
label = tagList(
|
||||
phosphoricons::ph("trash")
|
||||
phosphoricons::ph("x-circle"),
|
||||
i18n$t("Cancel")
|
||||
),
|
||||
class = "btn-outline-danger",
|
||||
width = "100%"
|
||||
|
|
@ -140,9 +141,7 @@ create_column_server <- function(id,
|
|||
info_alert <- shinyWidgets::alert(
|
||||
status = "info",
|
||||
phosphoricons::ph("question"),
|
||||
i18n$t("Choose a name for the column to be created or modified,"),
|
||||
i18n$t("then enter an expression before clicking on the button above to validate or on "),
|
||||
phosphoricons::ph("trash"), i18n$t("to delete it.")
|
||||
i18n$t("Choose a name for the column to be created or modified, then enter an expression before clicking on the button below to create the variable, or cancel to exit without saving anything.")
|
||||
)
|
||||
|
||||
rv <- reactiveValues(
|
||||
|
|
@ -244,6 +243,7 @@ list_allowed_operations <- function() {
|
|||
}
|
||||
|
||||
|
||||
|
||||
#' @inheritParams shiny::modalDialog
|
||||
#' @export
|
||||
#'
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue