/usr/share/doc/r-cran-selectr/tests/testthat/test-method-registration.R

context("methods")

test_that("method registration occurs correctly", {
    library(XML)
    xdoc <- xmlParse("<svg><circle /></svg>")

    library(xml2)
    x2doc <- read_xml("<svg><circle /></svg>")

    results <- querySelector(xdoc, "circle")
    results <- querySelector(x2doc, "circle")
})

Generated by dwww version 1.15 on Fri May 24 06:59:04 CEST 2024.