fixed: missing line for journal-title

wikipathways · Sep 7, 2024 · 6180ba3 · 6180ba3
1 parent cc89a2a
commit 6180ba3
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/scripts/fetch_figures_v2.R b/scripts/fetch_figures_v2.R
@@ -193,6 +193,7 @@ extract_figures <- function(xml_content, exfigids) {
   # Process each article
   cat(paste("Processing",length(processed_articles),"articles\n"))
   for (article in processed_articles) {
+    journal_title <- xml_text(xml_find_first(article, ".//journal-title"))
     journal_nlm_ta <- xml_text(xml_find_first(article, ".//journal-id[@journal-id-type='nlm-ta']"))
     publisher_name <- xml_text(xml_find_first(article, ".//publisher-name"))
     article_title <- xml_text(xml_find_first(article, ".//article-title"))