kopie van https://git.sr.ht/~hrbrmstr/splashr
boB Rudis
7 jaren geleden
9 gewijzigde bestanden met toevoegingen van 29 en 11 verwijderingen
@ -1,6 +1,20 @@ |
|||
context("basic functionality") |
|||
test_that("we can do something", { |
|||
|
|||
#expect_that(some_function(), is_a("data.frame")) |
|||
spact <- splash_active() |
|||
|
|||
expect_that(spact, equals(TRUE)) |
|||
|
|||
if (spact) { |
|||
|
|||
expect_that(length(splash_debug()), equals(7)) |
|||
expect_that(length(splash_version()), equals(9)) |
|||
expect_that(render_json(url = "https://httpbin.org/get"), is_a("splash_json")) |
|||
expect_that(render_png(url = "https://httpbin.org/get"), is_a("magick-image")) |
|||
expect_that(render_png(url = "https://httpbin.org/get"), is_a("magick-image")) |
|||
expect_that(render_html(url = "https://httpbin.org/get"), is_a("xml_document")) |
|||
expect_that(render_har(url = "https://httpbin.org/get"), is_a("har")) |
|||
|
|||
} |
|||
|
|||
}) |
|||
|
Laden…
Reference in new issue