401 Authentication Error from ping()

[peridoteagle]

Using the username/pwd Cushion implementation suggested in the docs, I get a 401 Authentication Error from the URL I am trying to access when I ping it. It looks like this can be fixed through adding argument labels to the function.

Session Info

# function that DOES NOT work and produces authentication error later
ping <- function(cushion, as = 'list', ...) {
  check_cushion(cushion)
  sofa_GET(cushion$make_url(), as = as, args = NULL, cushion$get_headers(),
           cushion$get_auth(), ...)
}

# function that does not produce authentication error
ping <- function(cushion, as = 'list', ...) {
  check_cushion(cushion)
  sofa_GET(cushion$make_url(), as = as, args = NULL, headers = cushion$get_headers(),
           auth = cushion$get_auth(), ...)

[sckott]

thanks - try reinstalling remotes::install_github("ropensci/sofa"), should work now

[peridoteagle]

Can confirm that it works now. Thanks for making this change!

[sckott]

👍