test_that("og_validate() works", {

  web <- og_parse('https://www.rstudio.com')

  skip_if(length(web) == 0)

  expect_type(og_validate(web), 'logical')
})