Minor fix

IVFL-BOKU · Apr 26, 2019 · 696d664 · 696d664
1 parent 2b984b9
commit 696d664
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/R/S2_download.R b/R/S2_download.R
@@ -102,10 +102,10 @@ S2_download = function(url, destfile, zip = TRUE, skipExisting = TRUE, progressB
           success[i] = TRUE
         },
         warning = function(w) {
-          if (file.exists(destfile[i])) {
-            unlink(destfile[i])
-          }
           if (all(w$message == 'Operation was aborted by an application callback')) {
+            if (file.exists(destfile[i])) {
+              unlink(destfile[i])
+            }
             breakLoop <<- TRUE
           }
         },