tests/testthat/test-content.R

test_that("content", {
  expect_equal(
    content_csv(),
    "text/csv"
  )

  expect_equal(
    content_tsv(),
    "tab-separated-values"
  )

  expect_equal(
    content_html(),
    "text/html"
  )

  expect_equal(
    content_plain(),
    "text/plain"
  )

  expect_equal(
    content_json(),
    "application/json"
  )

  expect_equal(
    content_protobuf(),
    "application/x-protobuf"
  )
})
devOpifex/ambiorix documentation built on Oct. 15, 2024, 10:21 p.m.