diff --git a/.Rprofile b/.Rprofile index 6ba92c8..ebf0505 100644 --- a/.Rprofile +++ b/.Rprofile @@ -36,8 +36,6 @@ if (! file.exists("./myScripts/.myProfile.R")) { } else { # local profile exists ... validate state: cat("\n\nLoading local functions ...") - source("./myScripts/.myProfile.R") - if (! exists("myEMail")) { # ... has eMail been defined? cat("ERROR !\n") cat("=======\n") @@ -63,6 +61,8 @@ if (! file.exists("./myScripts/.myProfile.R")) { source(".utilities.R") # local profile appears sane, source utilities + source("./myScripts/.myProfile.R") + if (! exists("MYSPE")) { # if MYSPE has not yet been defined, define it now # ... and write it into the profile. prf <- readLines("./myScripts/.myProfile.R")