chore: remove swap_vanity_url() and accommodate new API fields (#493)

Author: karawoo

NAMESPACE

@@ -161,7 +161,6 @@ export(set_schedule_weekday)
 export(set_schedule_year)
 export(set_thumbnail)
 export(set_vanity_url)
-export(swap_vanity_url)
 export(swap_vanity_urls)
 export(tbl_connect)
 export(terminate_jobs)

NEWS.md

@@ -7,6 +7,8 @@
 - Removed `get_job()`, which was deprecated in 0.6.0. Instead, use `get_jobs()`
   to get a data frame of jobs, use `get_job_list()` to get a list of job
   objects, and use `get_log()` to get the log for a job (#491).
+- Removed `swap_vanity_url()`, which was deprecated in 0.6.0. Use
+  `swap_vanity_urls()` instead (#493).
 
 # connectapi 0.9.0
 

R/deploy.R

@@ -621,29 +621,6 @@ swap_vanity_urls <- function(content_a, content_b) {
   )
 }
 
-#' Swap Vanity URLs
-#'
-#' Swap the vanity URLs of two pieces of content.
-#' This function is deprecated; please use \code{\link{swap_vanity_urls}}.
-#'
-#' @param from A Content object
-#' @param to A Content object
-#'
-#' @returns A list of the new vanity URLs for `from` and `to`
-#'
-#' @family content functions
-#' @export
-swap_vanity_url <- function(from, to) {
-  lifecycle::deprecate_warn("0.6.0", "swap_vanity_url()", "swap_vanity_urls()")
-  res <- swap_vanity_urls(from, to)
-  return(
-    list(
-      from = res[["content_a"]],
-      to = res[["content_b"]]
-    )
-  )
-}
-
 #' Poll Task
 #'
 #' Polls a task, waiting for information about a deployment. If the task has
@@ -695,7 +672,6 @@ poll_task <- function(task, wait = 1, callback = message) {
   task
 }
 
-
 #' Build a Dashboard URL from a Content Item
 #'
 #' Returns the URL for the content dashboard (opened to the selected pane).

R/ptype.R

@@ -20,7 +20,8 @@ connectapi_ptypes <- list(
   groups = tibble::tibble(
     "guid" = NA_character_,
     "name" = NA_character_,
-    "owner_guid" = NA_character_
+    "owner_guid" = NA_character_,
+    "gid" = NA_character_
   ),
   usage_shiny = tibble::tibble(
     "content_guid" = NA_character_,