(DRAFT) Read from Connect Vanity Urls

[slodge]

Very much draft PR to look at #616

devtools::load_all()

auth <- board_url_auth_connect(key=Sys.getenv("UAT_KEY_1"))

board <- board_url(c(
    my_vanity_url_pin = "https://connect-uat.example.com/example_mtcars_pin/"
  ), 
  auth=auth,
  use_cache_on_failure = FALSE
)

httr::with_verbose({
  board %>% pin_read("my_vanity_url_pin")
})

Currently this code works for the simple case (as required in #616) of providing an API key either directly or via CONNECT_API_KEY, but does not support the rsconnect mechanism where path specific signatureHeaders are required.

Still to do on this PR:

• [ ] Maintainers review (including is this the API change they want?)
• [ ] Update documentation
• [ ] Update news.md
• [ ] Some kind of unit test?
• [ ] Run Build->Check Package in the RStudio IDE, or devtools::check(), to make sure your change did not add any messages, warnings, or errors.

Will put other questions/observations/ideas back in #616

[juliasilge]

@slodge I've got a new board_connect_url() up and running in #706! If you would like to install it to try it out in your situation, that would be super helpful. You can install via devtools::install_github("rstudio/pins-r@board-connect-url").

[slodge]

Closing - team want to go via copy paste of a new board

[github-actions[bot]]

This pull request has been automatically locked. If you believe you have found a related problem, please file a new issue (with a reprex: https://reprex.tidyverse.org) and link to this issue.