diff --git a/R/build-home-index.R b/R/build-home-index.R index 3c39aca2a..4f86fe615 100644 --- a/R/build-home-index.R +++ b/R/build-home-index.R @@ -22,7 +22,7 @@ build_home_index <- function(pkg = ".", quiet = TRUE) { render_page(pkg, "home", data, "index.html", quiet = quiet) strip_header <- isTRUE(pkg$meta$home$strip_header) - hide_badges <- pkg$development$mode == "release" && !pkg$development$in_dev + hide_badges <- FALSE # pkg$development$mode == "release" && !pkg$development$in_dev update_html( dst_path, diff --git a/R/tweak-homepage.R b/R/tweak-homepage.R index b1a77797a..ac177df5c 100644 --- a/R/tweak-homepage.R +++ b/R/tweak-homepage.R @@ -115,7 +115,8 @@ badges_extract <- function(html) { xml2::xml_remove(x) - as.character(badges) + badges <- as.character(badges) + badges[!grepl("download", badges, ignore.case = TRUE)] } badges_extract_text <- function(x) {