From 0a283a40808bfbb2cc40a0442818dd00db30bca7 Mon Sep 17 00:00:00 2001 From: Branson Fox <32143148+bransonf@users.noreply.github.com> Date: Thu, 7 Feb 2019 15:20:16 -0600 Subject: [PATCH] add test for logic greater than length 1 --- tests/testthat/test_date_filter.R | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/tests/testthat/test_date_filter.R b/tests/testthat/test_date_filter.R index dd5f0a8..c7b9cbe 100644 --- a/tests/testthat/test_date_filter.R +++ b/tests/testthat/test_date_filter.R @@ -69,3 +69,10 @@ test_that("Non-standard Evaluation works", { expect_silent(csb_date_filter(january_2018, "datetimeinit", month = 1)) expect_silent(csb_date_filter(january_2018, datetimeinit, month = 1)) }) + + +# test that logical arguments greater than length one pass -------- + +test_that("Logical arguments of length > 1 Pass", { + expect_silent(csb_date_filter(january_2018, datetimeinit, day = 1:15, month = 1:6, year = 09:14)) +})