Merge pull request #1643 from rstudio/fix-normalize-locale-interactiv…

…e-tbl Ensure that supplied locale is normalized when creating an interactive table
rstudio · Apr 27, 2024 · f327659 · f327659 · github-actions · Apr 27, 2024
2 parents 4f8c6b1 + ca2a2e3
commit f327659
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/render_as_i_html.R b/R/render_as_i_html.R
@@ -54,7 +54,7 @@ render_as_ihtml <- function(data, id) {
   has_tab_spanners <- dt_spanners_exists(data = data)
 
   # Obtain the language from the `locale`, if provided
-  locale <- dt_locale_get_value(data = data)
+  locale <- normalize_locale(dt_locale_get_value(data = data))
 
   # Generate a `lang_defs` object to pass to the `language` argument
   if (is.null(locale) || locale == "en") {