tests/testthat/test_1-0-0_generate_LaTeX_manual.R

In hutils: Miscellaneous R Functions and Aliases

context("LaTeX manual")

test_that("Generate LaTeX manual", {
  skip_on_cran()
  skip_on_appveyor()
  skip_if_not(!nzchar(Sys.getenv("texi2dvi")))
  skip_if_not(!file.exists("fastmatch.pdf"))
  generate_LaTeX_manual("fastmatch", launch = FALSE)
  expect_true(file.exists("fastmatch.pdf"))
  if (file.exists("fastmatch.pdf")) {
    file.remove("fastmatch.pdf")
  }
})