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 autobuild <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     # git_revision {
  13     global("git_revision","b79d88001537df06dac28c27be3d4887ca2d9238")
  14     # git_revision }
  15     global("changesfile", function(srcname,version='*') {
  16         return(file.path(pbuilder_results
  17                         ,paste(srcname,'_',version,'_'
  18                               ,host_arch(),'.changes',sep='')))
  19     })
  20
  21     cache <- file.path(cache_root,'cache.rda')
  22     if (file.exists(cache)) {
  23         load(cache,envir=.GlobalEnv)
  24     }
  25 }