Better name for this test skipper

Author: jennybc

tests/testthat/helper.R

@@ -90,7 +90,7 @@ skip_if_not_ci <- function() {
   skip("Not on GitHub Actions, Travis, or Appveyor")
 }
 
-skip_if_no_git_config <- function() {
+skip_if_no_git_user <- function() {
   cfg <- git2r::config()
   user_name <- cfg$local$`user.name` %||% cfg$global$`user.name`
   user_email <- cfg$local$`user.email` %||% cfg$global$`user.email`

tests/testthat/test-git.R

@@ -1,5 +1,5 @@
 test_that("git_has_commit() changes after first commit", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   git_init()

tests/testthat/test-github-actions.R

@@ -1,7 +1,7 @@
 context("GitHub Actions")
 
 test_that("uses_github_actions() reports usage of GitHub Actions", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   expect_false(uses_github_actions())
@@ -22,7 +22,7 @@ test_that("check_uses_github_actions() can throw error", {
 })
 
 test_that("use_github_actions() configures GitHub Actions", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   use_git()
@@ -52,7 +52,7 @@ test_that("use_github_actions() configures GitHub Actions", {
 })
 
 test_that("use_github_actions() configures .Rbuildignore", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   expect_false(uses_circleci())
@@ -64,7 +64,7 @@ test_that("use_github_actions() configures .Rbuildignore", {
 })
 
 test_that("use_github_action_check_full() configures full GitHub Actions", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   use_git()
@@ -97,7 +97,7 @@ test_that("use_github_action_check_full() configures full GitHub Actions", {
 })
 
 test_that("use_github_action_check_full() configures the pr commands", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   use_git()
@@ -111,7 +111,7 @@ test_that("use_github_action_check_full() configures the pr commands", {
 })
 
 test_that("use_tidy_github_actions() configures the full check and pr commands", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   use_git()

tests/testthat/test-use-badge.R

@@ -15,7 +15,7 @@ test_that("use_lifecycle_badge() handles bad and good input", {
 
 test_that("use_binder_badge() needs a github repository", {
   skip_if(getRversion() < 3.2)
-  skip_if_no_git_config()
+  skip_if_no_git_user()
   scoped_temporary_project()
   expect_error(use_binder_badge())
 })

tests/testthat/test-use-circleci.R

@@ -1,7 +1,7 @@
 context("use_circleci")
 
 test_that("uses_circleci() reports usage of CircleCI", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   expect_false(uses_circleci())
@@ -21,7 +21,7 @@ test_that("check_uses_circleci() can throw error", {
 })
 
 test_that("use_circleci() configures CircleCI", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   use_git()
@@ -37,7 +37,7 @@ test_that("use_circleci() configures CircleCI", {
 })
 
 test_that("use_circleci() specifies Docker image", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   use_git()
@@ -49,7 +49,7 @@ test_that("use_circleci() specifies Docker image", {
 })
 
 test_that("use_circleci() properly formats keys for cache", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   use_git()
@@ -67,7 +67,7 @@ test_that("use_circleci() properly formats keys for cache", {
 })
 
 test_that("use_circleci() configures .Rbuildignore", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   expect_false(uses_circleci())

tests/testthat/test-use-git.R

@@ -9,7 +9,7 @@ test_that('use_git_config(scope = "project) errors if project not using git', {
 })
 
 test_that("use_git_config() can set local config", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   use_git()
@@ -36,7 +36,7 @@ test_that("use_git_hook errors if project not using git", {
 })
 
 test_that("git remote handlers work", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
 
   scoped_temporary_package()
   use_git()

tests/testthat/test-use-readme.R

@@ -15,7 +15,7 @@ test_that("use_readme_rmd() creates README.Rmd", {
 })
 
 test_that("use_readme_rmd() sets up git pre-commit hook if pkg uses git", {
-  skip_if_no_git_config()
+  skip_if_no_git_user()
   skip_if_not_installed("rmarkdown")
 
   scoped_temporary_package()

tests/testthat/test-use-tidy-style.R

@@ -2,7 +2,7 @@ context("use_tidy_style")
 
 test_that("styling the package works", {
   skip_if(getRversion() < 3.2)
-  skip_if_no_git_config()
+  skip_if_no_git_user()
   skip_if_not_installed("styler")
 
   pkg <- scoped_temporary_package()
@@ -17,7 +17,7 @@ test_that("styling the package works", {
 
 test_that("styling of non-packages works", {
   skip_if(getRversion() < 3.2)
-  skip_if_no_git_config()
+  skip_if_no_git_user()
   skip_if_not_installed("styler")
 
   proj <- scoped_temporary_project()