Update tests/testthat/test-java_env.R

e-kotov · Copilot · web-flow · commit baebde448b50 · 2025-09-22T13:37:09.000+02:00
Co-authored-by: Copilot &lt;175728472+Copilot@users.noreply.github.com&gt;
diff --git a/tests/testthat/test-java_env.R b/tests/testthat/test-java_env.R
@@ -1,15 +1,15 @@
-test_that("java_get_home() gets java_get_home", {
+test_that("java_get_home() gets JAVA_HOME", {
   withr::with_envvar(
-    c("java_get_home" = "/path/to/java"),
+    c("JAVA_HOME" = "/path/to/java"),
     expect_equal(java_get_home(), "/path/to/java")
   )
 })
 
-test_that("java_get_home() returns empty string when java_get_home is not set", {
+test_that("java_get_home() returns empty string when JAVA_HOME is not set", {
   withr::with_envvar(
-    c("java_get_home" = NA),
+    c("JAVA_HOME" = NA),
     {
-      Sys.unsetenv("java_get_home")
+      Sys.unsetenv("JAVA_HOME")
       expect_equal(java_get_home(), "")
     }
   )

Original file line number	Diff line number	Diff line change
`@@ -1,15 +1,15 @@`
`1`		`-test_that("java_get_home() gets java_get_home", {`
	`1`	`+test_that("java_get_home() gets JAVA_HOME", {`
`2`	`2`	`withr::with_envvar(`
`3`		`- c("java_get_home" = "/path/to/java"),`
	`3`	`+ c("JAVA_HOME" = "/path/to/java"),`
`4`	`4`	`expect_equal(java_get_home(), "/path/to/java")`
`5`	`5`	`)`
`6`	`6`	`})`
`7`	`7`
`8`		`-test_that("java_get_home() returns empty string when java_get_home is not set", {`
	`8`	`+test_that("java_get_home() returns empty string when JAVA_HOME is not set", {`
`9`	`9`	`withr::with_envvar(`
`10`		`- c("java_get_home" = NA),`
	`10`	`+ c("JAVA_HOME" = NA),`
`11`	`11`	`{`
`12`		`- Sys.unsetenv("java_get_home")`
	`12`	`+ Sys.unsetenv("JAVA_HOME")`
`13`	`13`	`expect_equal(java_get_home(), "")`
`14`	`14`	`}`
`15`	`15`	`)`