Update packages
This commit is contained in:
23
elpa/ess-20181003.2153/etc/ESSR/LOADREMOTE
Normal file
23
elpa/ess-20181003.2153/etc/ESSR/LOADREMOTE
Normal file
@@ -0,0 +1,23 @@
|
||||
## -*- mode: R -*-
|
||||
## loading code which is first sent to R on remote sessions
|
||||
local({
|
||||
ver <- '1.3'
|
||||
root <- '~/.config/ESSR'
|
||||
if(!file.exists(root))
|
||||
dir.create(root, recursive = TRUE)
|
||||
## cannot use sprintf here
|
||||
essr_file <- file.path(root, paste('ESSRv', ver, '.rds', sep = ''))
|
||||
tryCatch({
|
||||
if(!file.exists(essr_file)) {
|
||||
url <- paste('https://github.com/emacs-ess/ESS/raw/ESSRv', ver, '/etc/ESSR.rds', sep = '')
|
||||
utils::download.file(url, essr_file)
|
||||
}
|
||||
ESSR <- readRDS(essr_file)
|
||||
attach(ESSR)
|
||||
print(TRUE)
|
||||
},
|
||||
error = function(e) {
|
||||
print(e)
|
||||
print(FALSE)
|
||||
})
|
||||
})
|
||||
Reference in New Issue
Block a user