add test

Author: eitsupi

tests/testthat/test-use_lintr.R

@@ -35,3 +35,12 @@ test_that("use_lintr with type = full also works", {
   lints <- lint_dir(tmp)
   expect_length(lints, 0L)
 })
+
+test_that("use_lintr add .lintr to .Rbuildignore for packages", {
+  tmp <- withr::local_tempdir()
+  usethis::create_package(tmp)
+  setwd(tmp)
+  lintr_file <- use_lintr()
+  expect_true(file.exists(lintr_file))
+  expect_true("^\\.lintr$" %in% readLines(".Rbuildignore"))
+})