tests/testthat/test-inline.R

test_that("toInlineString", {
    expect_identical(
        object = toInlineString(
            x = c("aaa", "bbb"),
            class = "var"
        ),
        expected = "{.var aaa}, {.var bbb}"
    )
    expect_identical(
        object = toInlineString(
            x = c("aaa", "bbb", "ccc"),
            n = 2L,
            class = "var"
        ),
        expected = "{.var aaa}, {.var bbb}..."
    )
})
acidgenomics/r-acidcli documentation built on June 13, 2025, 7:08 p.m.