From ec50f221383a2aea8adde09b7ba8b6903263fbee Mon Sep 17 00:00:00 2001
From: Will Cornwell <w.cornwell@unsw.edu.au>
Date: Wed, 31 Jul 2024 17:00:47 +1000
Subject: [PATCH] another edge case?

---
 R/align_taxa.R    | 6 ++----
 man/align_taxa.Rd | 6 ++----
 2 files changed, 4 insertions(+), 8 deletions(-)

diff --git a/R/align_taxa.R b/R/align_taxa.R
index a261eb95..cd648bdf 100644
--- a/R/align_taxa.R
+++ b/R/align_taxa.R
@@ -155,10 +155,9 @@
 #'
 #' @examples
 #' \donttest{
-#' resources <- load_taxonomic_resources()
 #' 
 #' # example 1
-#' align_taxa(c("Poa annua", "Abies alba"), resources = resources)
+#' align_taxa(c("Poa annua", "Abies alba"))
 #' 
 #' # example 2
 #' input <- c("Banksia serrata", "Banksia serrate", "Banksia cerrata", 
@@ -168,8 +167,7 @@
 #'   APCalign::align_taxa(
 #'     original_name = input,
 #'     identifier = "APCalign test",
-#'     full = TRUE,
-#'     resources = resources
+#'     full = TRUE
 #'   ) 
 #'   
 #' }
diff --git a/man/align_taxa.Rd b/man/align_taxa.Rd
index 7ac0aa32..528d4264 100644
--- a/man/align_taxa.Rd
+++ b/man/align_taxa.Rd
@@ -188,10 +188,9 @@ sp. [Royal NP]".
 }
 \examples{
 \donttest{
-resources <- load_taxonomic_resources()
 
 # example 1
-align_taxa(c("Poa annua", "Abies alba"), resources = resources)
+align_taxa(c("Poa annua", "Abies alba"))
 
 # example 2
 input <- c("Banksia serrata", "Banksia serrate", "Banksia cerrata", 
@@ -201,8 +200,7 @@ aligned_taxa <-
   APCalign::align_taxa(
     original_name = input,
     identifier = "APCalign test",
-    full = TRUE,
-    resources = resources
+    full = TRUE
   ) 
   
 }