R/org_allows_forking.R

In ghclass: Tools for Managing Classes on GitHub

#' @rdname org_perm
#' @export
#'
org_allows_forking = function(org) {
  arg_is_chr_scalar(org)

  res = purrr::safely(github_api_org)(org)

  if (failed(res)) {
    cli::cli_abort(c(
      "Failed to retrieve details for org {.val {org}}.",
      error_bullets(res)
    ))
  }

  result(res)$members_can_fork_private_repositories
}