remove symlinks on packrat loading

EliLillyCo · Feb 5, 2019 · d590dc4 · d590dc4
1 parent 67a6d1d
commit d590dc4
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/.Rprofile b/.Rprofile
@@ -1,3 +1,11 @@
+# ensure no symlinks are present in lib-R subdirectory
+sfiles <- list.files(paste0("packrat/lib-R/x86_64-pc-linux-gnu/", getRversion()), full.names = TRUE)
+if (length(sfiles) > 0L) {
+  tmp <- file.remove(sfiles)
+    rm(tmp)
+    }
+    rm(sfiles)
+
 #### -- Packrat Autoloader (version 0.5.0) -- ####
 source("packrat/init.R")
 #### -- End Packrat Autoloader -- ####