tests/testthat/test-format_channels_args.R

In condathis: Run Any CLI Tool on a 'Conda' Environment

test_that("Format Channels args", {
  expect_equal(format_channels_args(), c("-c", "bioconda", "-c", "conda-forge"))
  expect_equal(format_channels_args(NULL), c("-c", "bioconda", "-c", "conda-forge"))
  expect_equal(format_channels_args(NA), c("-c", NA_character_))
  expect_equal(format_channels_args(1), c("-c", "1"))
  expect_equal(format_channels_args("A", "BCD"), c("-c", "A", "-c", "BCD"))
})