test_that("can handle logo in subdir", {
src <- withr::local_tempdir()
dst <- withr::local_tempdir()
dir_create(path(src, "man", "figures"))
file_create(path(src, "man", "figures", "logo.svg"))
pkg <- structure(list(src_path = src, dst_path = dst), class = "pkgdown")
expect_true(has_logo(pkg))
expect_snapshot(copy_logo(pkg))
expect_true(file_exists(path(dst, "logo.svg")))
expect_equal(logo_path(pkg, 0), "logo.svg")
expect_equal(logo_path(pkg, 1), "../logo.svg")
})
Generated by dwww version 1.15 on Sat May 18 10:59:27 CEST 2024.