tests/testthat/test-utilities.R

context("Auxiliary functions")

test_that("Output is as expected", {
  expect_equal(currentGitHubRef("GuangchuangYu/badger"), "GuangchuangYu/badger")
  expect_equal(assembleBadgeOutput("X", "Y", "Z"), "[![Z](https://X)](https://Y)")
})

Try the badger package in your browser

Any scripts or data that you put into this service are public.

badger documentation built on June 22, 2024, 9:21 a.m.