Tweak variable name

hadley · hadley · commit 19c00c1a41d3 · 2025-08-08T13:17:03.000-04:00
diff --git a/R/test-that.R b/R/test-that.R
@@ -172,8 +172,8 @@ test_code <- function(code, env, reporter = NULL, skip_on_empty = TRUE) {
       withCallingHandlers(
         {
           eval(code, test_env)
-          has_expectations <- the$test_expectations > starting_expectations
-          if (!has_expectations && skip_on_empty) {
+          new_expectations <- the$test_expectations > starting_expectations
+          if (!new_expectations && skip_on_empty) {
             skip_empty()
           }
         },

Original file line number	Diff line number	Diff line change
`@@ -172,8 +172,8 @@ test_code <- function(code, env, reporter = NULL, skip_on_empty = TRUE) {`
`172`	`172`	`withCallingHandlers(`
`173`	`173`	`{`
`174`	`174`	`eval(code, test_env)`
`175`		`- has_expectations <- the$test_expectations > starting_expectations`
`176`		`- if (!has_expectations && skip_on_empty) {`
	`175`	`+ new_expectations <- the$test_expectations > starting_expectations`
	`176`	`+ if (!new_expectations && skip_on_empty) {`
`177`	`177`	`skip_empty()`
`178`	`178`	`}`
`179`	`179`	`},`