diff --git a/tests/testthat/test-vector-control.R b/tests/testthat/test-vector-control.R index 8c2e2d49..3950ac87 100644 --- a/tests/testthat/test-vector-control.R +++ b/tests/testthat/test-vector-control.R @@ -201,9 +201,11 @@ test_that('indoor_spraying process sets spray_time correctly', { ms_gamma = matrix(c(-0.009, -0.009), nrow=2, ncol=1) ) spray_time <- mock_double(rep(0, 4)) + renderer <- list(render = mockery::mock()) correlations <- get_correlation_parameters(parameters) process <- indoor_spraying( spray_time, + renderer, parameters, correlations ) @@ -216,6 +218,7 @@ test_that('indoor_spraying process sets spray_time correctly', { mockery::expect_args(target_mock, 1, seq(4), 'spraying', .9, correlations) mockery::expect_args( spray_time$queue_update_mock(), + renderer$render, 1, 50, c(3, 4)