stub Sys.time call to fix failing test

ThomUK · Dec 5, 2023 · 14ac849 · 14ac849
1 parent 2fa3acb
commit 14ac849
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/tests/testthat/test-spcr_make_data_bundle.R b/tests/testthat/test-spcr_make_data_bundle.R
@@ -70,6 +70,9 @@
 "test data bundle process" |>
   test_that({
 
+    # stub out the Sys.time call with a repeating value
+    mockery::stub(spcr_make_data_bundle, "Sys.time", as.POSIXct("2023-12-04 21:25:25"))
+
     db <- spcr_make_data_bundle(
       test_measure_data,
       test_report_config,