rename .ps1 to .txt to bypass the security scan on certain platforms …

…(sigh...)

DESCRIPTION

@@ -1,7 +1,7 @@
 Package: xfun
 Type: Package
 Title: Supporting Functions for Packages Maintained by 'Yihui Xie'
-Version: 0.47.8
+Version: 0.47.9
 Authors@R: c(
   person("Yihui", "Xie", role = c("aut", "cre", "cph"), email = "[email protected]", comment = c(ORCID = "0000-0003-0645-5666")),
   person("Wush", "Wu", role = "ctb"),

R/base64.R

@@ -149,7 +149,7 @@ mime_type = function(x, use_mime = loadable('mime'), empty = 'text/plain') {
   if (Sys.which(cmd) == '') {
     if (!is_windows()) stop("The 'file' command is not found")
     cmd = 'powershell'
-    arg = c('-ExecutionPolicy', 'Bypass', '-File', shQuote(pkg_file('scripts', 'mime-type.ps1')))
+    arg = c('-ExecutionPolicy', 'Bypass', '-File', shQuote(pkg_file('scripts', 'mime-type.txt')))
   }
   system2(cmd, c(arg, shQuote(x)), stdout = TRUE)[1]
 }