tests/testthat/test-api.R

test_that("s() and ss() work", {
  session <- selenider_test_session()

  open_url("https://ashbythorpe.github.io/selenider/articles/test-site.html")

  expect_equal(s(".toggleable"), find_element(session, ".toggleable"))
  expect_equal(ss(".toggleable"), find_elements(session, ".toggleable"))

  expect_true(s(".toggleable") == find_element(session, ".toggleable"))
})

Try the selenider package in your browser

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

selenider documentation built on April 3, 2025, 5:51 p.m.