posit-dev
diff --git a/‎NEWS.md
+3 b/‎NEWS.md
+3
diff --git a/‎R/get.R
-6 b/‎R/get.R
-6
diff --git a/‎tests/testthat/2024.08.0/__api__/v1/oauth/integrations/credentials-b3e87e-POST.json renamed to ‎tests/testthat/2024.08.0/__api__/v1/oauth/integrations/credentials-f08930-POST.json b/‎tests/testthat/2024.08.0/__api__/v1/oauth/integrations/credentials-b3e87e-POST.json renamed to ‎tests/testthat/2024.08.0/__api__/v1/oauth/integrations/credentials-f08930-POST.json
diff --git a/‎tests/testthat/2024.08.0/__api__/v1/oauth/integrations/credentials-8dea8e-POST.json renamed to ‎tests/testthat/2024.08.0/__api__/v1/oauth/integrations/credentials-fe6213-POST.json b/‎tests/testthat/2024.08.0/__api__/v1/oauth/integrations/credentials-8dea8e-POST.json renamed to ‎tests/testthat/2024.08.0/__api__/v1/oauth/integrations/credentials-fe6213-POST.json
@@ -9,6 +9,9 @@
   rather than in UTC. (#400)
 - `get_content()` now includes vanity URLs in the returned data frame on Connect
   v2024.06.0 and later. (#398)
+- Removed unnecessary null check with default from `get_oauth_credentials()` and
+  `get_oauth_content_credentials()` functions for `requested_token_type` parameter
+  that was causing issues with Connect < 2025.03.0. (#407)
 
 # connectapi 0.7.0
 
 
@@ -674,9 +674,6 @@ get_oauth_credentials <- function(
   requested_token_type = NULL
 ) {
   validate_R6_class(connect, "Connect")
-  if (is.null(requested_token_type)) {
-    requested_token_type <- "urn:ietf:params:oauth:token-type:access_token"
-  }
   url <- v1_url("oauth", "integrations", "credentials")
   body <- list(
     grant_type = "urn:ietf:params:oauth:grant-type:token-exchange",
@@ -743,9 +740,6 @@ get_oauth_content_credentials <- function(
       )
     }
   }
-  if (is.null(requested_token_type)) {
-    requested_token_type <- "urn:ietf:params:oauth:token-type:access_token"
-  }
   url <- v1_url("oauth", "integrations", "credentials")
   body <- list(
     grant_type = "urn:ietf:params:oauth:grant-type:token-exchange",
Original file line number	Diff line number	Diff line change
`@@ -674,9 +674,6 @@ get_oauth_credentials <- function(`
`674`	`674`	`requested_token_type = NULL`
`675`	`675`	`) {`
`676`	`676`	`validate_R6_class(connect, "Connect")`
`677`		`- if (is.null(requested_token_type)) {`
`678`		`- requested_token_type <- "urn:ietf:params:oauth:token-type:access_token"`
`679`		`- }`
`680`	`677`	`url <- v1_url("oauth", "integrations", "credentials")`
`681`	`678`	`body <- list(`
`682`	`679`	`grant_type = "urn:ietf:params:oauth:grant-type:token-exchange",`
`@@ -743,9 +740,6 @@ get_oauth_content_credentials <- function(`
`743`	`740`	`)`
`744`	`741`	`}`
`745`	`742`	`}`
`746`		`- if (is.null(requested_token_type)) {`
`747`		`- requested_token_type <- "urn:ietf:params:oauth:token-type:access_token"`
`748`		`- }`
`749`	`743`	`url <- v1_url("oauth", "integrations", "credentials")`
`750`	`744`	`body <- list(`
`751`	`745`	`grant_type = "urn:ietf:params:oauth:grant-type:token-exchange",`