The R Project SVN R

Rev

Rev 25393 | Rev 29960 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 25393 Rev 25655
Line 43... Line 43...
43 
{
 43 
{
44 
    int res;
 44 
    int res;
45 
 
 45 
 
46 
    initialized = -1;
 46 
    initialized = -1;
47 
    if(strcmp(R_GUIType, "X11") && strcmp(R_GUIType, "GNOME") &&
 47 
    if(strcmp(R_GUIType, "X11") && strcmp(R_GUIType, "GNOME") &&
48 
	    strcmp(R_GUIType, "Tk")) {
 48 
	    strcmp(R_GUIType, "Tk")  && strcmp(R_GUIType, "AQUA")) {
49 
	warning("X11 module is not available under this GUI");
 49 
	warning("X11 module is not available under this GUI");
50 
	return;
 50 
	return;
51 
    }
 51 
    }
52 
    res = moduleCdynload("R_X11", 1, 1);
 52 
    res = moduleCdynload("R_X11", 1, 1);
53 
    if(!res) return;
 53 
    if(!res) return;