tests/testthat/test-email.R

test_that("E-Mail info check works", {

  skip_on_cran()
  skip_on_travis()
  skip_on_appveyor()

  x <- get_email_info("john@doe.com")

  expect_equal(class(x), "list")
  expect_equal(x$email, "john@doe.com")
})

Try the emailvalidation package in your browser

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

emailvalidation documentation built on May 31, 2023, 9:37 p.m.