The R Project SVN R

Rev

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

Rev 25983 Rev 26152
Line 204... Line 204...
204
      curfile = g_list_next(curfile);
204
      curfile = g_list_next(curfile);
205
    }
205
    }
206
*/
206
*/
207
    if((tmpdir = getenv("R_SESSION_TMPDIR"))) {
207
    if((tmpdir = getenv("R_SESSION_TMPDIR"))) {
208
	sprintf(buf, "rm -rf %s", tmpdir);
208
	sprintf(buf, "rm -rf %s", tmpdir);
209
	system(buf);
209
	R_system(buf);
210
    }
210
    }
211
 
211
 
212
 
212
 
213
    /* close all the graphics devices */
213
    /* close all the graphics devices */
214
    KillAllDevices();
214
    KillAllDevices();