Try manual re-encoding

r-lib · Jan 10, 2024 · 3008620 · 3008620
1 parent 6a7ec8c
commit 3008620
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/tempfile.R b/R/tempfile.R
@@ -63,7 +63,7 @@ local_tempfile <- function(new = NULL, lines = NULL, envir = parent.frame(), .lo
       con <- file(path, open = "wb", encoding = "UTF-8")
       defer(close(con))
 
-      writeLines(lines, con)
+      writeLines(enc2utf8(lines), con)
     }
 
     defer(unlink(path, recursive = TRUE), envir = .local_envir)