my.update.packages:
In vlulla/vlutils: Common utilities that I find useful

1	my.update.packages(...)

...

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (...) 
{
    local({
        r <- getOption("repos")
        r["CRAN"] <- "http://ftp.ussg.iu.edu/CRAN"
        options(repos = r)
    })
    update.packages(checkBuilt = TRUE, ask = FALSE)
  }