hard error in tests

dajmcdon · dajmcdon · commit 08ac0403c81e · 2024-08-15T11:26:31.000-07:00
diff --git a/tests/testthat/test-arrange-canonical.R b/tests/testthat/test-arrange-canonical.R
@@ -5,7 +5,7 @@ test_that("canonical arrangement works", {
     geo_value = rep(c("ga", "ca"), each = 4),
     time_value = rep(2:1, times = 4)
   )
-  expect_warning(arrange_canonical(tib))
+  expect_error(arrange_canonical(tib))
 
   tib <- tib %>% as_epi_df(additional_metadata = list(other_keys = "demo_grp"))
   expect_equal(names(tib), c("geo_value", "time_value", "x", "demo_grp"))

Original file line number	Diff line number	Diff line change
`@@ -5,7 +5,7 @@ test_that("canonical arrangement works", {`
`5`	`5`	`geo_value = rep(c("ga", "ca"), each = 4),`
`6`	`6`	`time_value = rep(2:1, times = 4)`
`7`	`7`	`)`
`8`		`- expect_warning(arrange_canonical(tib))`
	`8`	`+ expect_error(arrange_canonical(tib))`
`9`	`9`
`10`	`10`	`tib <- tib %>% as_epi_df(additional_metadata = list(other_keys = "demo_grp"))`
`11`	`11`	`expect_equal(names(tib), c("geo_value", "time_value", "x", "demo_grp"))`