From cfed869196d8d7244bdb1f6c798ab685b4a3ae8f Mon Sep 17 00:00:00 2001 From: Sebastian Funk Date: Fri, 20 Oct 2023 05:55:39 +0100 Subject: [PATCH] improve deprecation test --- tests/testthat/test-get_dist.R | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/tests/testthat/test-get_dist.R b/tests/testthat/test-get_dist.R index 5ab7a4768..463c3c964 100644 --- a/tests/testthat/test-get_dist.R +++ b/tests/testthat/test-get_dist.R @@ -1,7 +1,6 @@ test_that("get_dist is deprecated", { data <- data.table::data.table(mean = 1, mean_sd = 1, sd = 1, sd_sd = 1, source = "test", disease = "test", dist = "gamma") - expect_warning( - get_dist(data, disease = "test", source = "test"), - "deprecated" + expect_deprecated( + get_dist(data, disease = "test", source = "test") ) })