# .Rprofile - brendan o'connor - anyall.org/code
options(showWarnCalls=T, showErrorCalls=T)
options(repos=c("http://cran.cnr.Berkeley.edu","http://cran.stat.ucla.edu"))

goquartz = function() {
  # http://www.rforge.net/CarbonEL/
  library("CarbonEL")
  options(device='quartz')
  Sys.unsetenv("DISPLAY")
}

if (.Platform$GUI == "X11" && readLines(pipe("uname"))=="Darwin") {
  goquartz()
}