download: delete tmp files

HendrikSchultheis · Jun 7, 2018 · 5f64bb7 · 5f64bb7
1 parent d38d536
commit 5f64bb7
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/R/function.R b/R/function.R
@@ -1193,6 +1193,9 @@ download <- function(file, filename, plot, width, height, ppi = 72, save_plot =
   # create zip file
   out <- utils::zip(zipfile = file, files = files, flags = "-j") # discard file path
 
+  # remove tmp files
+  file.remove(files)
+
   # remove notification
   shiny::removeNotification(session$ns("download-note"))