Add deprecated warning for select_taxa (#112)

AtlasOfLivingAustralia · Dec 15, 2021 · d9d6157 · d9d6157
1 parent d4f417a
commit d9d6157
Show file tree

Hide file tree

Showing 3 changed files with 23 additions and 0 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -32,6 +32,7 @@ export(search_taxa)
 export(select_columns)
 export(select_filters)
 export(select_locations)
+export(select_taxa)
 export(show_all_atlases)
 export(show_all_cached_files)
 export(show_all_profiles)

diff --git a/R/deprecated_functions.R b/R/deprecated_functions.R
@@ -1,5 +1,20 @@
 #' Deprecated functions
 #'
+#' @description
+#' `r lifecycle::badge("deprecated")`
+#' 
+#' Use [search_taxa()] instead of `select_taxa()`.
+#' 
+#' @export
+#' @name deprecated
+select_taxa <- function(query, is_id = FALSE) {
+  lifecycle::deprecate_warn("2.0.0", "select_taxa()", "search_taxa()")
+
+  search_taxa.default(
+    query = query,
+    is_id = {if(missing(is_id)){FALSE}else{is_id}})
+}
+
 #' @description
 #' `r lifecycle::badge("deprecated")`
 #' 

diff --git a/man/deprecated.Rd b/man/deprecated.Rd