From 3e0cee69988e09042523454e189d4e61b7113843 Mon Sep 17 00:00:00 2001 From: Joshua Lambert Date: Fri, 17 Nov 2023 12:37:25 +0000 Subject: [PATCH] unquote vector name in epidist_utils test --- tests/testthat/test-epidist_utils.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/testthat/test-epidist_utils.R b/tests/testthat/test-epidist_utils.R index 90ab93528..31234e1c1 100644 --- a/tests/testthat/test-epidist_utils.R +++ b/tests/testthat/test-epidist_utils.R @@ -149,7 +149,7 @@ test_that("clean_epidist_params works as expected for pois", { }) test_that("clean_epidist_params fails when pois parameters are incorrect", { - pois_param <- c("means" = 1) + pois_param <- c(means = 1) class(pois_param) <- "pois" expect_error( clean_epidist_params(prob_dist_params = pois_param),