tests/testthat/test-ssl.R

context("SSL")

test_that("SSL certificates verified as expected", {
  skip_on_cran()
  expect_equal(status_code(GET("https://google.com")), 200L)
  expect_equal(status_code(GET("https://firefox.com")), 200L)
})
hadley/httr documentation built on Nov. 4, 2023, 3:17 a.m.