correcting issue with stream folder

Kwazao · Mar 24, 2020 · f015d4b · f015d4b · Kwazao · Mar 25, 2020
1 parent f9cada8
commit f015d4b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/stream.R b/R/stream.R
@@ -526,7 +526,7 @@ stream_tweets2 <- function(..., dir = NULL, append = FALSE) {
   pat <- paste0(file_name, "\\-[[:digit:]]{1,}\\.json$")
   jsons <- list.files(dir, pattern = pat, full.names = TRUE)
   file_name <- paste0(dir, ".json")
-  unlink(dir, recursive = TRUE)
+  #unlink(dir, recursive = TRUE)
   if (!parse) {
     return(invisible())
   }