`fromJSON()` not working for R 4.3

I am using the devel version of R on a Windows machine and jsonlite::fromJSON() thinks that the text string, which is a valid URL, is a file path and the functions below end up returning empty data frames and warning messages that the pulls cannot be completed as requested. I have written the following work around if the behaviour is not corrected before 4.3 is released. Regardless, we could implement the following function because it appears to be more robust than relying on just jsonlite::fromJSON()

get_json <- function(url) {
  out <- httr::GET(url) %>%
    httr::content(as = "text", encoding = "UTF-8") %>%
    jsonlite::fromJSON()
  if (!(is.data.frame(out) && NROW(out) > 0)) {
    stop(glue::glue("No data returned by the warehouse using {url}"))
  }
  return(out)
}

nwfscSurvey/R/PullCatch.fn.R

Line 193 in 3d68e95

DataPull <- try(jsonlite::fromJSON(UrlText))

nwfscSurvey/R/PullCatch.fn.R

Line 236 in 5a97b04

All.Tows <- jsonlite::fromJSON(UrlText)

nwfscSurvey/R/pull_bio.R

Line 114 in 5a97b04

bio_pull <- try(jsonlite::fromJSON(url_text))

nwfscSurvey/R/pull_bio.R

Line 161 in 5a97b04

len_pull <- try(jsonlite::fromJSON(url_text))