Bug in overlay_raw_map fixed

noriakis · Jun 14, 2024 · 1cc92ed · 1cc92ed
1 parent 3ab685b
commit 1cc92ed
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/overlay_functions.R b/R/overlay_functions.R
@@ -97,8 +97,9 @@ ggplot_add.overlay_raw_map <- function(object, plot, object_name) {
         path <- paste0(object$pid, ".png")
         if (!is.null(object$directory)) {
             path <- paste0(object$directory,"/",path)
+        } else {
+            download.file(url=url, destfile=path, mode='wb')
         }
-        download.file(url=url, destfile=path, mode='wb')
     }
 
     ## Load, transparent and rasterize