Skip to content

Commit

Permalink
Update server.R
Browse files Browse the repository at this point in the history
removed an unnecessary message
  • Loading branch information
pingfan-hu committed Sep 9, 2024
1 parent b2b106a commit 99f36fe
Showing 1 changed file with 0 additions and 1 deletion.
1 change: 0 additions & 1 deletion R/server.R
Original file line number Diff line number Diff line change
Expand Up @@ -221,7 +221,6 @@ sd_server <- function(input, output, session, config, db = NULL) {
if (file.access('.', 2) == 0) { # Check if current directory is writable
tryCatch({
utils::write.csv(df_local, "data.csv", row.names = FALSE)
message("Data successfully written to data.csv")
}, error = function(e) {
warning("Unable to write to data.csv. The survey will run without data collection.")
message("Error details: ", e$message)
Expand Down

0 comments on commit 99f36fe

Please sign in to comment.