🙈

Author: maelle

R/build-llm.R

@@ -80,9 +80,10 @@ create_absolute_links <- function(main_html, pkg) {
     ]
 
     href_absolute <- xml2::url_absolute(xml2::xml_attr(a_internal, "href"), url)
-    href_absolute <- path_ext_set(href_absolute, "md")
+    href_absolute <- sub("html$", "md", href_absolute)
     xml2::xml_attr(a_internal, "href") <- href_absolute
   }
+
   xml2::xml_attr(a, "class") <- NULL
 }
 

tests/testthat/_snaps/build-llm/llm.md

@@ -35,8 +35,8 @@ pkgdown is designed to make it quick and easy to build a website for
 your package. You can see pkgdown in action at
 <https://pkgdown.r-lib.org>: this is the output of pkgdown applied to
 the latest version of pkgdown. Learn more in
-[`vignette("pkgdown")`](https:/pkgdown.r-lib.org/articles/pkgdown.md) or
-[`?build_site`](https:/pkgdown.r-lib.org/reference/build_site.md).
+[`vignette("pkgdown")`](https://pkgdown.r-lib.org/articles/pkgdown.md)
+or [`?build_site`](https://pkgdown.r-lib.org/reference/build_site.md).
 
 ------------------------------------------------------------------------