tests/testthat/test_extractor_app.R

In corporaexplorer: A 'Shiny' App for Exploration of Text Collections

# This file is for testing the applications in the inst/ directory.

library(shinytest2)

test_that("explorer app works", {
    # Don't run these tests on the CRAN build servers
    skip_on_cran()

    appdir <- system.file(package = "corporaexplorer", "download")
    test_app(appdir)
})