tests/testthat/test-text.R

In acidgenomics/r-acidcli: Acid Genomics Command Line Interface

test_that("text", {
    expect_message(
        object = txt(c("XXX", "YYY")),
        regexp = "XXXYYY"
    )
    expect_message(
        object = verbatim(c("XXX", "YYY")),
        regexp = "XXX\nYYY"
    )
})