R/auth.R

In shunsambongi/wordpress: R interface for WordPress

wordpress_basic_auth <- function(
  username = wordpress_username(),
  password = wordpress_password()
) {
  httr::authenticate(username, password, type = "basic")
}

wordpress_username <- function() {
  wordpress_envvar("USERNAME")
}

wordpress_password <- function() {
  wordpress_envvar("PASSWORD")
}