add snapshot test

extendr · Sep 7, 2024 · 23e2cb1 · 23e2cb1
1 parent ebb2f18
commit 23e2cb1
Showing 1 changed file with 13 additions and 0 deletions.
diff --git a/tests/testthat/test-use_msrv.R b/tests/testthat/test-use_msrv.R
@@ -0,0 +1,13 @@
+test_that("use_msrv() modifies the MSRV in the DESCRIPTION", {
+  skip_if_not_installed("usethis")
+
+  path <- withr::local_package("testpkg")
+
+  # capture setup messages
+  withr::local_options(usethis.quiet = FALSE)
+
+  use_extendr(path, quiet = TRUE)
+  use_msrv("1.70")
+
+  expect_snapshot(cat(readLines("DESCRIPTION"), sep = "\n"))
+})