junk/downloadfile.R

downloadfile <-
function( url){
	if(Sys.info()["sysname"]=="Linux"){
		sc(paste("wget -q ",url,sep=""))
	}
	if(Sys.info()["sysname"]=="Darwin"){
		sc(paste("curl -silent -O ",url,sep=""))
	}
}
dvera/travis documentation built on June 5, 2019, 5:12 a.m.