andreas/FreesearchR
1
0
Fork 0
mirror of https://github.com/agdamsbo/FreesearchR.git synced 2026-06-19 04:27:30 +02:00
Code Issues Projects Releases Packages Wiki Activity

minor fixes

Browse source
This commit is contained in:
Andreas Gammelgaard Damsbo 2025-03-03 08:44:46 +01:00
commit e5b702a183
No known key found for this signature in database
5 changed files with 8 additions and 35 deletions
Download patch file Download diff file Expand all files Collapse all files

4
R/redcap_read_shiny_module.R
View file

@ -187,7 +187,7 @@ m_redcap_readServer <- function(id) {
datamods:::insert_alert(
selector = ns("connect"),
status = "success",
make_success_alert(
include_data_alert(
dataIdName = "see_data",
extra = tags$p(tags$b(phosphoricons::ph("check", weight = "bold"), "Connected to server!"), tags$p(paste0(data_rv$project_name, " loaded."))),
btn_show_data = TRUE
@ -306,7 +306,7 @@ m_redcap_readServer <- function(id) {
#' @importFrom htmltools tagList tags
#' @importFrom shiny icon getDefaultReactiveDomain
make_success_alert <- function(dataIdName = "see_data",
include_data_alert <- function(dataIdName = "see_data",
btn_show_data,
see_data_text = "Click to see data",
extra = NULL,