Unconditionally encode paths as UTF-8

tidyverse · May 8, 2022 · bdecf47 · bdecf47
1 parent 000790d
commit bdecf47
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/R/path.R b/R/path.R
@@ -60,7 +60,7 @@ standardise_path <- function(path) {
     }
   }
 
-  as.list(path)
+  as.list(enc2utf8(path))
 }
 
 standardise_one_path <- function (path, write = FALSE) {
@@ -140,6 +140,8 @@ standardise_one_path <- function (path, write = FALSE) {
     stop("Can only read from, not write to, .zip", call. = FALSE)
   }
 
+  path <- enc2utf8(path)
+
   switch(compression,
     gz = gzfile(path, ""),
     bz2 = bzfile(path, ""),