test_that("CSS in <link>", {
content <- read_html(
# nolint start
'<html><head><link rel="stylesheet" href="https://stackpath.bootstrapcdn.com/bootstrap/4.4.1/css/bootstrap.min.css"></head></html>'
# nolint end
)
css <- css_inline(content)
expect_true("external" %in% names(css))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.