tests/testthat/test-install_megadepth.R

In LieberInstitute/megadepth: megadepth: BigWig and BAM related utilities

test_that("installation of the latest version works", {
    expect_message(
        megadepth::install_megadepth(force = TRUE),
        "megadepth has been installed"
    )
    expect_equal(
        find_exec("megadepth", "Megadepth"),
        find_megadepth()
    )
    expect_true(
        grepl(
            pattern = megadepth_cmd("--version", stdout = TRUE),
            paste("megadepth", megadepth_latest())
        )
    )
    expect_equal(
        megadepth_cmd("--version", stdout = TRUE),
        megadepth_shell(version = TRUE)
    )
})