tests/testthat/test_glob.R

test_that("glob", {
    path <- file.path(".", "*.{R,r,S,s}")
    expect_equal(basename(glob(path, engine = "r")),
                 c("test_expand.R", "test_glob.R"))
})
trevorld/bracer documentation built on April 24, 2023, 12:11 p.m.