Nothing
test_that("adminlte_vars works", {
vars <- adminlte_vars("light-blue" = "#fff", dark_bg = "#000")
expect_is(vars, "list")
expect_is(vars, "fresh_sass_vars")
expect_is(vars, "adminlte_vars")
expect_length(vars, 2)
})
test_that("adminlte_color works", {
vars <- adminlte_color(light_blue = "#fff", red = "#000")
expect_is(vars, "list")
expect_is(vars, "fresh_sass_vars")
expect_is(vars, "adminlte_vars")
expect_length(vars, 2)
})
test_that("adminlte_sidebar works", {
vars <- adminlte_sidebar(width = "400px", dark_bg = "#fff")
expect_is(vars, "list")
expect_is(vars, "fresh_sass_vars")
expect_is(vars, "adminlte_vars")
expect_length(vars, 2)
})
test_that("adminlte_global works", {
vars <- adminlte_global(content_bg = "#fff")
expect_is(vars, "list")
expect_is(vars, "fresh_sass_vars")
expect_is(vars, "adminlte_vars")
expect_length(vars, 1)
})
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.