From 43d13d54e091a381e1e913fac535cd7fa3dd80e1 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Kirill=20M=C3=BCller?= <krlmlr@users.noreply.github.com>
Date: Tue, 9 Jan 2024 18:26:59 +0100
Subject: [PATCH] Let's try

Co-authored-by: Lionel Henry <lionel.hry@gmail.com>
---
 R/local.R | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/R/local.R b/R/local.R
index 190eb57ae..2666822ae 100644
--- a/R/local.R
+++ b/R/local.R
@@ -134,12 +134,9 @@ local_reproducible_output <- function(width = 80,
   )
 
   if (isTRUE(capabilities("NLS"))) {
-    # FIXME: We need a new `locale` argument here, should be consistent
-    # with the `lang` argument to `local_reproducible_output()`
-    withr::local_envvar(c(LC_ALL = "en_GB"), .local_envir = .env)
-    if (!(Sys.getenv("LANG") %in% c("C", "C.UTF-8"))) {
+    suppressWarnings(
       withr::local_language(lang, .local_envir = .env)
-    }
+    )
   }
 
   withr::local_collate("C", .local_envir = .env)