diff --git a/deploy_serverless_app.R b/deploy_serverless_app.R index 510e1ec..f20f25a 100644 --- a/deploy_serverless_app.R +++ b/deploy_serverless_app.R @@ -3,12 +3,12 @@ files <- list.files("./bs/R", pattern = ".R", full.names = TRUE) file.copy(files, "./app/", overwrite = TRUE) -file <- "./app/MainApp.R" -content <- readLines(file) -content <- gsub("uploadUIField", - "fileInput(\"file\", \"Choose CSV File\",\n accept = c(\n \"text/csv\",\n \"text/comma-separated-values,text/plain\",\n \".csv\"\n )\n ),\n", - content) -writeLines(content, file) +# file <- "./app/MainApp.R" +# content <- readLines(file) +# content <- gsub("uploadUIField", +# "fileInput(\"file\", \"Choose CSV File\",\n accept = c(\n \"text/csv\",\n \"text/comma-separated-values,text/plain\",\n \".csv\"\n )\n ),\n", +# content) +# writeLines(content, file) # Copy www files from bs