tests/testthat/test-citation.R

test_that("CITATION parses and mentions the package", {
  expect_silent(cit <- utils::citation("extrafontdb"))
  # Some CRAN setups return a list of bibentry; coerce to character defensively
  txt <- paste(capture.output(print(cit)), collapse = "\n")
  expect_true(grepl("extrafontdb", tolower(txt)))
})

Try the extrafontdb package in your browser

Any scripts or data that you put into this service are public.

extrafontdb documentation built on Nov. 5, 2025, 7:33 p.m.