From fc30ad09357cdc74d3ffdc9230b1849790c39a55 Mon Sep 17 00:00:00 2001 From: trestletech Date: Wed, 28 Aug 2019 11:05:04 -0500 Subject: [PATCH] Fix upper-case test --- tests/testthat/test-app.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/testthat/test-app.R b/tests/testthat/test-app.R index b53fa3d6a..288faefbd 100644 --- a/tests/testthat/test-app.R +++ b/tests/testthat/test-app.R @@ -38,7 +38,7 @@ test_that("app with both r/ and R/ prefers R/", { renv <- loadSupport("../test-helpers/app4-both") expect_false(exists("lowerHelper", envir=renv)) - expect_equal(upperHelper, "abc", envir=renv) + expect_equal(get("upperHelper", envir=renv), "abc") }) test_that("With ui/server.R, global.R is loaded before R/ helpers and into the right envs", {