refactor: use fs for profile path

ropensci-review-tools · Sep 16, 2024 · 43e5711 · 43e5711
1 parent e1b0ac5
commit 43e5711
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/R/render.R b/R/render.R
@@ -336,8 +336,9 @@ add_links <- function(path, main_language, # nolint: cyclocomp_linter
 
   document_path <- path
 
-  lang_profile <- file.path(
-    project_dir, paste0("_quarto-", language_code, ".yml")
+  lang_profile <- fs::path(
+    project_dir, paste0("_quarto-", language_code),
+    ext = "yml"
   )
   if (fs::file_exists(lang_profile)) {
     lang_config <- read_yaml(lang_profile)