change to UserProfile

mikejohnson51 · Jul 7, 2023 · 0519db7 · 0519db7
1 parent 3076294
commit 0519db7
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/netrc_utils.R b/R/netrc_utils.R
@@ -16,9 +16,9 @@ whatOS = function(){
 
 build_file = function(file){
   if (whatOS() == "windows") {
-    paste0(Sys.getenv("HOMEDRIVE"), "\\", paste0("_", file))
+    paste0(Sys.getenv("UserProfile"), "\\", paste0(".", file))
   } else {
-    file.path(Sys.getenv("HOME"),  paste0(".", file))
+    paste0(Sys.getenv("HOME"), "/" , paste0(".", file))
   }
 }