R/zzz.R

In JARS3N/fullcontactR: R link to Fullcontact.com API

.onLoad <- function(libname = find.package("fullcontactR"), pkgname = "fullcontactR") {
if (file.exists(system.file("fullcontactapikey.rds",package="fullcontactR"))==TRUE){
  apikey<<-readRDS(system.file("fullcontactapikey.rds",package="fullcontactR"))  
  } 
if (file.exists(system.file("fullcontactapikey.rds",package="fullcontactR"))==FALSE){
  warning("There is no apikey cached on this system,one is required for these functions to work.Please aquire your apikey from fullcontact.com and run CacheKey() to save the key.The apikey will be loaded to the global enviroment when this package loads thereafter.")
  }
}