tests/testthat/test-xml_node.R

test_that("print method is correct", {
  x <- read_html(test_path("lego.html.bz2"))
  body <- xml_find_first(x, "//body")
  expect_snapshot(print(body))
})

Try the xml2 package in your browser

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

xml2 documentation built on May 29, 2024, 1:28 a.m.