Commit e24dc9e9 authored by Facundo Muñoz's avatar Facundo Muñoz ®️
Browse files

Bugfix: finding home path in non-UTF8 Windows with accented characters in user-name

https://github.com/r-lib/fs/issues/291
parent 716aace1
Package: mapMCDA Package: mapMCDA
Title: Produce an epidemiological risk map by weighting multiple risk Title: Produce an epidemiological risk map by weighting multiple risk
factors factors
Version: 0.4.52 Version: 0.4.53
Date: 2020-05-23 Date: 2020-05-23
Authors@R: c( person("Andrea", "Apolloni", email = Authors@R: c( person("Andrea", "Apolloni", email =
"andrea.apolloni@cirad.fr", role = c("ctb"), comment = "Animal "andrea.apolloni@cirad.fr", role = c("ctb"), comment = "Animal
......
...@@ -25,7 +25,7 @@ server <- function(input, output, session) { ...@@ -25,7 +25,7 @@ server <- function(input, output, session) {
# For shinyFiles package # For shinyFiles package
volumes <- c(Home = fs::path_home(), "R Installation" = R.home(), getVolumes()()) volumes <- c(Home = normalizePath(path.expand("~/")), "R Installation" = R.home(), getVolumes()())
shinyFileChoose(input, "file", roots = volumes, session = session) # use after input$file shinyFileChoose(input, "file", roots = volumes, session = session) # use after input$file
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment