rm examples for deprecated functions; version bump

DESCRIPTION

@@ -1,8 +1,8 @@
 Package: rWikiPathways
 Type: Package
 Title: rWikiPathways - R client library for the WikiPathways API
-Version: 1.21.2
-Date: 2022-04-15
+Version: 1.21.3
+Date: 2023-10-18
 Authors@R: c(person("Egon", "Willighagen", role = c("aut","cre"),
                      email = "egon.willighagen@gmail.com",
                      comment = c(ORCID = "0000-0001-7542-0286")),

R/getCurationStatus.R

@@ -25,9 +25,6 @@ getCurationStatus <- function(pathway) {
 #' web services only and will be defunct at the next release.
 #' @param pathway WikiPathways identifier (WPID) for the pathway to download, e.g. WP4
 #' @return A \code{list} of tag name, display name, revision, text, timestampe and user
-#' @examples {
-#' #deprecated: getCurationTags('WP554')
-#' }
 #' @export
 getCurationTags <- function(pathway) {
     .Deprecated("getCurationStatus")
@@ -43,9 +40,6 @@ getCurationTags <- function(pathway) {
 #' web services only and will be defunct at the next release.
 #' @param pathway WikiPathways identifier (WPID) for the pathway to download, e.g. WP4
 #' @return A \code{list} of tag names
-#' @examples {
-#' #deprecated: getCurationTagNames('WP554')
-#' }
 #' @export
 getCurationTagNames <- function(pathway) {
     .Deprecated("getCurationStatus")
@@ -60,9 +54,6 @@ getCurationTagNames <- function(pathway) {
 #' web services only and will be defunct at the next release.
 #' @param tag (\code{character}) Official name of curation tag, e.g., "Curation:FeaturedPathway"
 #' @return A \code{list} of tag name, display name, revision, text, timestampe and user
-#' @examples {
-#' #deprecated: getEveryCurationTag('Curation:FeaturedPathway')
-#' }
 #' @export
 getEveryCurationTag <- function(tag) {
     .Deprecated("listCommunities")
@@ -78,9 +69,6 @@ getEveryCurationTag <- function(tag) {
 #' web services only and will be defunct at the next release.
 #' @param tag (\code{character}) Official name of curation tag, e.g., "Curation:FeaturedPathway"
 #' @return A \code{list} of pathway information, including WPID, url, name, species and revision
-#' @examples {
-#' #deprecated: getPathwaysByCurationTag('Curation:FeaturedPathway')
-#' }
 #' @export
 getPathwaysByCurationTag <- function(tag) {
     .Deprecated("getPathwaysByCommunity")
@@ -96,9 +84,6 @@ getPathwaysByCurationTag <- function(tag) {
 #' web services only and will be defunct at the next release.
 #' @param tag (\code{character}) Official name of curation tag, e.g., "Curation:FeaturedPathway"
 #' @return A \code{list} of pathway WPIDs
-#' @examples {
-#' #deprecated: getPathwayIdsByCurationTag('Curation:FeaturedPathway')
-#' }
 #' @export
 getPathwayIdsByCurationTag <- function(tag) {
     .Deprecated("getPathwayIdsByCommunity")

R/utilities.R

@@ -17,9 +17,6 @@
 #' web services only and will be defunct at the next release.
 #' @param base.url (optional) Ignore unless you need to specify a custom domain.
 #' @return New tab in default browser
-#' @examples {
-#' #deprecated: wikipathwaysAPI()
-#' }
 #' @importFrom utils browseURL
 #' @export
 wikipathwaysAPI <- function(base.url=.baseUrl){
@@ -42,9 +39,6 @@ wikipathwaysAPI <- function(base.url=.baseUrl){
 #' (default), xml, html, jpg, pdf, dump
 #' @param base.url (optional) Ignore unless you need to specify a custom domain.
 #' @return query result content
-#' @examples {
-#' #deprecated: wikipathwaysGET('listOrganisms')
-#' }
 #' @importFrom rjson fromJSON
 #' @importFrom httr GET
 #' @importFrom utils URLencode