tests/testthat/_snaps/01-get_repos-GitHub.md

repos_by_org query is built properly

Code
  gh_repos_by_org_query
Output
  [1] "\n        query GetReposByOrg($login: String!) {\n          repositoryOwner(login: $login) {\n            ... on Organization {\n              \n      repositories(first: 100) {\n        totalCount\n        pageInfo {\n          endCursor\n          hasNextPage\n        }\n        nodes {\n      repo_id: id\n      repo_name: name\n      default_branch: defaultBranchRef {\n        name\n      }\n      stars: stargazerCount\n      forks: forkCount\n      created_at: createdAt\n      last_activity_at: pushedAt\n      languages(first: 5) {\n        nodes {\n          name\n        }\n      }\n      issues_open: issues(first: 100, states: [OPEN]) {\n        totalCount\n      }\n      issues_closed: issues(first: 100, states: [CLOSED]) {\n        totalCount\n      }\n      organization: owner {\n        login\n      }\n      repo_url: url\n    }\n      }\n            }\n          }\n        }"

repos_by_user query is built properly

Code
  gh_repos_by_user_query
Output
  [1] "\n        query GetUsersRepos($login: String!){\n          user(login: $login) {\n            \n      repositories(first: 100) {\n        totalCount\n        pageInfo {\n          endCursor\n          hasNextPage\n        }\n        nodes {\n      repo_id: id\n      repo_name: name\n      default_branch: defaultBranchRef {\n        name\n      }\n      stars: stargazerCount\n      forks: forkCount\n      created_at: createdAt\n      last_activity_at: pushedAt\n      languages(first: 5) {\n        nodes {\n          name\n        }\n      }\n      issues_open: issues(first: 100, states: [OPEN]) {\n        totalCount\n      }\n      issues_closed: issues(first: 100, states: [CLOSED]) {\n        totalCount\n      }\n      organization: owner {\n        login\n      }\n      repo_url: url\n    }\n      }\n          }\n        }"

repos_by_ids query is built properly

Code
  gh_repos_by_ids_query
Output
  [1] "\n        query GetReposByIds($ids: [ID!]!) {\n          nodes(ids: $ids) {\n            ... on Repository {\n      repo_id: id\n      repo_name: name\n      default_branch: defaultBranchRef {\n        name\n      }\n      stars: stargazerCount\n      forks: forkCount\n      created_at: createdAt\n      last_activity_at: pushedAt\n      languages(first: 5) {\n        nodes {\n          name\n        }\n      }\n      issues_open: issues(first: 100, states: [OPEN]) {\n        totalCount\n      }\n      issues_closed: issues(first: 100, states: [CLOSED]) {\n        totalCount\n      }\n      organization: owner {\n        login\n      }\n      repo_url: url\n    \n            }\n          }\n        }\n        "

get_repos_with_code_from_orgs() pulls raw response

Code
  repos_with_code_from_orgs_raw <- github_testhost_priv$
    get_repos_with_code_from_orgs(code = "shiny", in_files = c("DESCRIPTION",
    "NAMESPACE"), output = "raw", verbose = TRUE)
Message
  > [Host:GitHub][Engine:REST][Scope:test_org] Pulling repositories...

get_repos_with_code_from_host() pulls and parses output into table

Code
  repos_with_code_from_host_table <- github_testhost_priv$
    get_repos_with_code_from_host(code = "DESCRIPTION", in_path = TRUE, output = "table_full",
    verbose = TRUE)
Message
  > [Host:GitHub][Engine:REST] Pulling repositories...

get_repos_with_code_from_repos() works

Code
  repos_with_code_from_repos_full <- github_testhost_priv$
    get_repos_with_code_from_repos(code = "tests", output = "table", verbose = TRUE)
Message
  > [Host:GitHub][Engine:REST][Scope:] Pulling repositories...

get_repos_with_code_from_host() pulls raw response

Code
  repos_with_code_from_host_raw <- github_testhost_priv$
    get_repos_with_code_from_host(code = "shiny", in_files = c("DESCRIPTION",
    "NAMESPACE"), output = "raw", verbose = TRUE)
Message
  > [Host:GitHub][Engine:REST] Pulling repositories...
  > Searching for code [shiny]...
  HTTP 401 Unauthorized.
  > Searching for code [shiny]...
  HTTP 401 Unauthorized.

get_repos_from_repos works

Code
  gh_repos_individual <- github_testhost_priv$get_repos_from_repos(verbose = TRUE,
    progress = FALSE)
Message
  > [Host:GitHub][Engine:GraphQl][Scope:test_org: 1 repos] Pulling repositories...

get_repos_contributors() works on GitHost level

Code
  gh_repos_with_contributors <- github_testhost_priv$get_repos_contributors(
    repos_table = test_mocker$use("gh_repos_table_with_platform"), verbose = TRUE,
    progress = FALSE)
Message
  > [Host:GitHub][Engine:REST] Pulling contributors...


Try the GitStats package in your browser

Any scripts or data that you put into this service are public.

GitStats documentation built on June 8, 2025, 12:29 p.m.