The R Project SVN R

Rev

Rev 28254 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 28254 Rev 28362
Line 51... Line 51...
51 
    ## X11/TclTk
 51 
    ## X11/TclTk
52 
    if (Sys.getenv("DISPLAY") == "")
 52 
    if (Sys.getenv("DISPLAY") == "")
53 
	Sys.putenv("DISPLAY" = ":0")
 53 
	Sys.putenv("DISPLAY" = ":0")
54 
 
 54 
 
55 
    ## sets initial current working directory to user's root
 55 
    ## sets initial current working directory to user's root
56 
    ## as RAqua is installed at system level
 56 
    ## as R.app is installed at system level
57 
 
 57 
 
58 
    ## this is to allow g77 compiler to work
 58 
    ## this is to allow g77 compiler to work
59 
    Sys.putenv("PATH" = paste(Sys.getenv("PATH"),":/usr/local/bin",sep = ""))
 59 
    Sys.putenv("PATH" = paste(Sys.getenv("PATH"),":/usr/local/bin",sep = ""))
60 
 
 60 
 
61 
    if( !file.exists("~/Library/RAqua") )
 61 
    if( !file.exists("~/Library/R") )
62 
	dir.create("~/Library/RAqua")
 62 
	dir.create("~/Library/R")
63 
    if( !file.exists("~/Library/RAqua/library") )
 63 
    if( !file.exists("~/Library/R/library") )
64 
	dir.create("~/Library/RAqua/library")
 64 
	dir.create("~/Library/R/library")
65 
    .libPaths("~/Library/RAqua/library")
 65 
    .libPaths("~/Library/R/library")
66 
}## end "Aqua"
 66 
}## end "Aqua"