Merge pull request #1297 from bigomics/dev-pathbank

Dev pathbank
bigomics · Dec 10, 2024 · 857735e · 857735e
2 parents 61cb170 + c675eb9
commit 857735e
Show file tree

Hide file tree

Showing 3 changed files with 2 additions and 117 deletions.
diff --git a/components/board.pathway/R/pathway_plot_wikipathway_graph.R b/components/board.pathway/R/pathway_plot_wikipathway_graph.R
@@ -131,7 +131,8 @@ functional_plot_wikipathway_graph_server <- function(id,
         }
 
         # Get pathway image using WPID and fc values
-        svg <- wikipathview(wp = pathway.id, val = fc)
+        shiny::req(pathway.id)
+        svg <- playbase::wikipathview(wp = pathway.id, val = fc)
         if (is.null(svg)) {
           return(NULL)
         }

diff --git a/components/board.pathway/R/pathway_wikipathview.R b/components/board.pathway/R/pathway_wikipathview.R
diff --git a/tests/testthat/_snaps/linux-4.3/snapshot/pathway_WikiPathways.png b/tests/testthat/_snaps/linux-4.3/snapshot/pathway_WikiPathways.png