Update fetch_figures.R

wikipathways · Mar 26, 2023 · 73261e2 · 73261e2
1 parent 5822d4c
commit 73261e2
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/scripts/fetch_figures.R b/scripts/fetch_figures.R
@@ -269,7 +269,7 @@ for (i in 1:page.count){
       img.from.path = paste0("https://www.ncbi.nlm.nih.gov/pmc/articles/",
                              article.data$pmcid,
                              "/bin/",article.data$image_filename)
-      img.to.path = file.path('figures',paste(fn, "jpg", sep = "."))
+      img.to.path = file.path('figures',paste(article.data$figid, "jpg", sep = "."))
       headers = c(
         `user-agent` = 'Mozilla/5.0 (Macintosh; Intel Mac OS X 10_15_7) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/102.0.5005.61 Safari/537.36'
       )