Removed name bits that were not working #85

traitecoevo · Sep 13, 2024 · cbd2c77 · cbd2c77
1 parent 5649805
commit cbd2c77
Showing 1 changed file with 2 additions and 4 deletions.
diff --git a/R/server.R b/R/server.R
@@ -392,10 +392,8 @@ infinity_server <- function(...) {
     output$downloadData <- downloadHandler(
       filename = function() {
         name_bits <- gsub(".parquet", "", input$ala_path)
-        name_bits <- gsub("Australia-", "", name_bits)
-        paste(input$place,
-              "-",
-              input$buffer_size,
+        name_bits <- gsub("infinitylists-", "", name_bits)
+        paste(input$buffer_size,
               "m-buffer-",
               name_bits,
               ".csv",