inst/ACORN-app/www/R/output/welcome_online_offline.R

output$online_offline <- renderText({
  
  
  if (! local_server_test) return(as.character(
    span(h4(icon("wifi"), "ONLINE"), br(), p("You are using the ONLINE version ", version, br(), "Uploaded data is only used while the App is open and deleted immediately on browser close."))))
  if (local_server_test) return(as.character(
    span(h4(icon("laptop"), "OFFLINE"), p("You are using the OFFLINE version ", version, br(), "No data will be uploaded at any stage.")
    #                                       ifelse("ACORN" %in% installed.packages(), 
    #                                              as.character(packageVersion("ACORN"), br(), "No data will be uploaded at any stage."),
    #                                              " dev."))))
    )))
})
ocelhay/ACORN documentation built on Dec. 6, 2020, 5:20 a.m.