pkg/trunk/R/zzz.R

   1 .First.lib <- function(libname, pkgname) {
   2     global <- function(name,value) assign(name,value,envir=.GlobalEnv)
   3     global("maintainer", 'cran2deb buildbot <cran2deb@example.org>')
   4     global("root", system.file(package='cran2deb'))
   5     global("cache_root", '/var/cache/cran2deb')
   6     global("pbuilder_results", '/var/cache/cran2deb/results')
   7     global("pbuilder_config", file.path(root,'etc/pbuilderrc'))
   8     global("dput_config", file.path(root,'etc/dput.cf'))
   9     global("dinstall_config", file.path(root,'etc/mini-dinstall.conf'))
  10     global("dinstall_archive", file.path(root,'var/archive'))
  11     global("r_depend_fields", c('Depends','Imports')) # Suggests, Enhances
  12     global("changesfile", function(srcname,version='*') {
  13         return(file.path(pbuilder_results
  14                         ,paste(srcname,'_',version,'_'
  15                               ,host_arch(),'.changes',sep='')))
  16     })
  17
  18     cache <- file.path(cache_root,'cache.rda')
  19     if (file.exists(cache)) {
  20         load(cache,envir=.GlobalEnv)
  21     }
  22 }