R/load.f.R

load.f <- function (file, ...) 
{
    ls.ext <- function(file) {
        local({
            base::load(file)
            base::ls()
        })
    }
    base::load(file, .GlobalEnv, ...)
    ls.ext(file)
}
John-R-Wallace/JRWToolBox documentation built on April 20, 2024, 9:31 p.m.