Nothing
test_that("match_version accepts only known versions", {
expect_equal(match_version("3"), "3")
expect_equal(match_version("4"), "4")
expect_equal(match_version("5"), "5")
expect_equal(match_version(3), "3")
expect_error(match_version("32"))
expect_error(match_version("23"))
expect_error(match_version("2"))
})
test_that("swagger_path returns a file path", {
expect_true(file.exists(swagger_path()))
expect_true(file.exists(swagger_path("3")))
expect_true(file.exists(swagger_path(3)))
expect_true(file.exists(swagger_path("4")))
expect_true(file.exists(swagger_path("5")))
expect_equal(swagger_path(5), swagger_path())
expect_equal(swagger_path("5"), swagger_path())
})
test_that("swagger_index returns a file path", {
expect_true(file.exists(swagger_index()))
expect_true(file.exists(swagger_path("3")))
expect_true(file.exists(swagger_path(3)))
expect_true(file.exists(swagger_path("4")))
expect_true(file.exists(swagger_path("5")))
expect_equal(swagger_index(5), swagger_index())
expect_equal(swagger_index("5"), swagger_index())
})
test_that("swagger_spec alters the api location", {
expect_true(
grepl(
"\"http://petstore.swagger.io/v2/swagger.json\"", fixed = TRUE,
swagger_spec()
)
)
expect_true(
grepl(
"'specialtestvalue'", fixed = TRUE,
swagger_spec("'specialtestvalue'")
)
)
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.