tests/testthat/test-highlight_fun.R

context("highlight_fun")

test_that("multiplication works", {
  res <- with_mock(
    "get_highlighted_text" = function() return("'highlighted text'"),
    highlight_fun("cat")
  )
})
famuvie/straddin documentation built on May 16, 2019, 10:08 a.m.