The R Project SVN R

Rev

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

Rev 86636 Rev 88761
Line 307... Line 307...
307 
       newGUI->statusbar != curGUI.statusbar)
 307 
       newGUI->statusbar != curGUI.statusbar)
308 
	askok(G_("The overall console properties cannot be changed\non a running console.\n\nSave the preferences and restart Rgui to apply them.\n"));
 308 
	askok(G_("The overall console properties cannot be changed\non a running console.\n\nSave the preferences and restart Rgui to apply them.\n"));
309 
 
 309 
 
310 
    if(strcmp(newGUI->language, curGUI.language)) {
 310 
    if(strcmp(newGUI->language, curGUI.language)) {
311 
	char *buf = malloc(50);
 311 
	char *buf = malloc(50);
- 
 
 312 
	if (!buf)
- 
 
 313 
	    R_ShowMessage(G_("Not enough memory"));
- 
 
 314 
	else {
312 
	askok(G_("The language for menus cannot be changed on a\n running console.\n\nSave the preferences and restart Rgui to apply to menus.\n"));
 315 
	    askok(G_("The language for menus cannot be changed on a\n running console.\n\nSave the preferences and restart Rgui to apply to menus.\n"));
313 
	snprintf(buf, 50, "LANGUAGE=%s", newGUI->language);
 316 
	    snprintf(buf, 50, "LANGUAGE=%s", newGUI->language);
314 
	putenv(buf);
 317 
	    putenv(buf);
315 
	/* no free here: storage remains in use */
 318 
	    /* no free here: storage remains in use */
- 
 
 319 
	}
316 
    }
 320 
    }
317 
 
 321 
 
318 
 
 322 
 
319 
/*  Set a new font? */
 323 
/*  Set a new font? */
320 
    if(strcmp(newGUI->font, curGUI.font) ||
 324 
    if(strcmp(newGUI->font, curGUI.font) ||