Fix last linting issue

r-lib · May 16, 2024 · 7e2cc9c · 7e2cc9c
1 parent ddf8bf1
commit 7e2cc9c
Showing 1 changed file with 1 addition and 3 deletions.
diff --git a/tests/testthat/test-templates.R b/tests/testthat/test-templates.R
@@ -73,12 +73,10 @@ test_that("find templates in local pkgdown first", {
 # Expected contents -------------------------------------------------------
 
 test_that("BS5 templates have main + aside", {
-  names <- dir(path_pkgdown("BS5", "templates"), pattern = "content-")
+  names <- dir_ls(path_pkgdown("BS5", "templates"), regexp = "content-")
   names <- path_ext_remove(path_file(names))
   names <- gsub("content-", "", names)
 
-  expect_length(names, 12)
-
   templates <- lapply(names, read_template_html,
     type = "content",
     pkg = list(bs_version = 5)