R/utils/init_login_db.r

@@ -14,7 +14,7 @@ credentials <- data.frame(
 # Init the database
 shinymanager::create_db(
   credentials_data = credentials,
-  sqlite_path = "config/auth.sqlite", # will be created
+  sqlite_path = "temp/auth.sqlite", # will be created
   passphrase = Sys.getenv("AUTH_DB_KEY")
   # passphrase = "passphrase_wihtout_keyring"
 )

app.R

@@ -1149,7 +1149,7 @@ server <- function(input, output, session) {
       # write vector to temp .Rmd file
       writeLines(empty_vec, temp_report, sep = "\n")
       # copy template .docx file
-      file.copy("references/reference.docx", temp_template, overwrite = TRUE)
+      file.copy("resources/references/reference.docx", temp_template, overwrite = TRUE)
 
       # render file via pandoc
       rmarkdown::render(