Connect: use /v1/tasks/{id} for task polling

[aronatkins]

Use GET /__api__/v1/tasks/{id} to track task progress.

rsconnect/R/client-connect.R

Lines 105 to 130 in 5c7fcf5

	waitForTask = function(taskId, quiet = FALSE) {
	start <- 0
	while (TRUE) {
	path <- paste0(file.path("/tasks", taskId), "?first_status=", start)
	response <- GET(service, authInfo, path)
	if (length(response$status) > 0) {
	if (!quiet) {
	messages <- unlist(response$status)
	messages <- stripConnectTimestamps(messages)
	# Made headers more prominent.
	heading <- grepl("^# ", messages)
	messages[heading] <- cli::style_bold(messages[heading])
	cat(paste0(messages, "\n", collapse = ""))
	}
	start <- response$last_status
	}
	if (length(response$finished) > 0 && response$finished) {
	return(response)
	}
	Sys.sleep(1)
	}
	},

Documentation:

• https://docs.posit.co/connect/api/#get-/v1/tasks/-id-