From 6abee8f78ee81a4a4201ca582e74783388286db6 Mon Sep 17 00:00:00 2001
From: Andreas Gammelgaard Damsbo <andreas@gdamsbo.dk>
Date: Fri, 7 Jun 2024 12:01:09 +0200
Subject: [PATCH] minor app updates

---
 app/rsconnect/shinyapps.io/agdamsbo/redcapcast.dcf     | 10 ----------
 .../shinyapps.io/cognitiveindex/shiny_cast.dcf         | 10 ----------
 app/ui.R                                               |  7 ++++---
 3 files changed, 4 insertions(+), 23 deletions(-)
 delete mode 100644 app/rsconnect/shinyapps.io/agdamsbo/redcapcast.dcf
 delete mode 100644 app/rsconnect/shinyapps.io/cognitiveindex/shiny_cast.dcf

diff --git a/app/rsconnect/shinyapps.io/agdamsbo/redcapcast.dcf b/app/rsconnect/shinyapps.io/agdamsbo/redcapcast.dcf
deleted file mode 100644
index 9635472..0000000
--- a/app/rsconnect/shinyapps.io/agdamsbo/redcapcast.dcf
+++ /dev/null
@@ -1,10 +0,0 @@
-name: redcapcast
-title:
-username: agdamsbo
-account: agdamsbo
-server: shinyapps.io
-hostUrl: https://api.shinyapps.io/v1
-appId: 11351429
-bundleId: 8567755
-url: https://agdamsbo.shinyapps.io/redcapcast/
-version: 1
diff --git a/app/rsconnect/shinyapps.io/cognitiveindex/shiny_cast.dcf b/app/rsconnect/shinyapps.io/cognitiveindex/shiny_cast.dcf
deleted file mode 100644
index 4fcbaf3..0000000
--- a/app/rsconnect/shinyapps.io/cognitiveindex/shiny_cast.dcf
+++ /dev/null
@@ -1,10 +0,0 @@
-name: shiny_cast
-title:
-username: cognitiveindex
-account: cognitiveindex
-server: shinyapps.io
-hostUrl: https://api.shinyapps.io/v1
-appId: 11351378
-bundleId: 8306502
-url: https://cognitiveindex.shinyapps.io/shiny_cast/
-version: 1
diff --git a/app/ui.R b/app/ui.R
index 0ad38e2..0b8ae6c 100644
--- a/app/ui.R
+++ b/app/ui.R
@@ -21,7 +21,7 @@ ui <- shiny::shinyUI(
     shiny::h4(
       "This tool includes to convenient functions:",
       shiny::br(),
-      "1) creating a REDCap data dictionary based on a spreadsheet (.csv/.xls(x)/.dta) and",
+      "1) creating a REDCap data dictionary based on a spreadsheet (.csv/.xls(x)/.dta/.ods) and",
       shiny::br(),
       "2) creating said database on a given REDCap server and uploading the dataset via API access."
     ),
@@ -39,7 +39,8 @@ ui <- shiny::shinyUI(
           ".csv",
           ".xls",
           ".xlsx",
-          ".dta"
+          ".dta",
+          ".ods"
         )
       ),
       shiny::h6("Below you can download the dataset formatted for upload and the
@@ -115,7 +116,7 @@ ui <- shiny::shinyUI(
     shiny::br(),
     shiny::hr(),
     shiny::tags$footer(shiny::strong("Disclaimer: "),
-      "This tool is aimed at demonstrating use of REDCapCAST. No responsibility for data loss or any other problems will be taken. Please contact me for support.",
+      "This tool is aimed at demonstrating use of REDCapCAST. The app can be run locally or on a hosted server (will save no data anywhere). No responsibility for data loss or any other problems will be taken. Please contact me for support.",
       shiny::br(),
       shiny::a("License: GPL-3+", href = "https://agdamsbo.github.io/REDCapCAST/LICENSE.html"),
       "|",