diff --git a/R/inject-bilingual-code.R b/R/inject-bilingual-code.R
index 65dff7dc..4ee0d8b0 100644
--- a/R/inject-bilingual-code.R
+++ b/R/inject-bilingual-code.R
@@ -124,23 +124,23 @@ inject_bilingual_code <- function(fn = get_index_filename(
   if(doc_type %in% c("techreport","manureport")){
     yaml_code <- c(
       '---',
-      'title: `r ifelse(fr(), meta$french_title, meta$title)`',
-      'region: `r ifelse(fr(), meta$french_region, meta$region)`',
+      'title: `r ifelse(csasdown::fr(), meta$french_title, meta$title)`',
+      'region: `r ifelse(csasdown::fr(), meta$french_region, meta$region)`',
       'csl: `r csl`',
       '---')
   } else if (doc_type == "sr") { # no title language flipping
     yaml_code <- c(
       '---',
-      'month: `r ifelse(fr(), meta$french_month, meta$month)`',
-      'region: `r ifelse(fr(), meta$french_region, meta$region)`',
+      'month: `r ifelse(csasdown::fr(), meta$french_month, meta$month)`',
+      'region: `r ifelse(csasdown::fr(), meta$french_region, meta$region)`',
       'csl: `r csl`',
       '---')
   } else {
     yaml_code <- c(
       '---',
-      'title: `r ifelse(fr(), meta$french_title, meta$title)`',
-      'month: `r ifelse(fr(), meta$french_month, meta$month)`',
-      'region: `r ifelse(fr(), meta$french_region, meta$region)`',
+      'title: `r ifelse(csasdown::fr(), meta$french_title, meta$title)`',
+      'month: `r ifelse(csasdown::fr(), meta$french_month, meta$month)`',
+      'region: `r ifelse(csasdown::fr(), meta$french_region, meta$region)`',
       'csl: `r csl`',
       '---')
   }