the response header may use lower-case location, not necessarily `L…

…ocation` (this should fix #436)
rstudio · Mar 13, 2024 · ba48597 · ba48597
1 parent 54eb1fd
commit ba48597
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/install.R b/R/install.R
@@ -206,7 +206,7 @@ auto_repo = function() {
     curlGetHeaders('https://mirror.ctan.org/systems/texlive/tlnet'),
     error = function(e) character()
   )
-  x = xfun::grep_sub('^location: ([^[:space:]]+)\\s*$', '\\1', x)
+  x = xfun::grep_sub('^location: ([^[:space:]]+)\\s*$', '\\1', x, ignore.case = TRUE)
   x = tail(x, 1)
   if (length(x) == 1) x else 'ctan'
 }