The R Project SVN R

Rev

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

Rev 41783 Rev 41793
Line 1453... Line 1453...
1453
		      rect(x_pos + r.x-150, y_pos + r.y-50, 300, 100),
1453
		      rect(x_pos + r.x-150, y_pos + r.y-50, 300, 100),
1454
		      Titlebar | Closebox | Modal);
1454
		      Titlebar | Closebox | Modal);
1455
    setclose(wconf, popupclose);
1455
    setclose(wconf, popupclose);
1456
    setbackground(wconf, bbg);
1456
    setbackground(wconf, bbg);
1457
    lwhat = newlabel(G_("variable name"), rect(10, 22, 90, 20), AlignLeft);
1457
    lwhat = newlabel(G_("variable name"), rect(10, 22, 90, 20), AlignLeft);
1458
    varname = newfield((char *)blah, rect(100, 20, 120, 20));
1458
    varname = newfield(blah, rect(100, 20, 120, 20));
1459
    lrb = newlabel(G_("type"), rect(50, 62, 50, 20), AlignLeft);
1459
    lrb = newlabel(G_("type"), rect(50, 62, 50, 20), AlignLeft);
1460
    rb_num = newradiobutton("numeric", rect(100, 60 , 80, 20), NULL);
1460
    rb_num = newradiobutton("numeric", rect(100, 60 , 80, 20), NULL);
1461
    rb_char = newradiobutton("character", rect(180, 60 , 80, 20), NULL);
1461
    rb_char = newradiobutton("character", rect(180, 60 , 80, 20), NULL);
1462
    isnumeric = (get_col_type(DE, popupcol) == NUMERIC);
1462
    isnumeric = (get_col_type(DE, popupcol) == NUMERIC);
1463
    if (isnumeric) check(rb_num); else check(rb_char);
1463
    if (isnumeric) check(rb_num); else check(rb_char);
Line 1684... Line 1684...
1684
	y = (pR->bottom - h) / 3; y = y > 20 ? y:20;
1684
	y = (pR->bottom - h) / 3; y = y > 20 ? y:20;
1685
    } else {
1685
    } else {
1686
	x = (devicewidth(NULL) - w) / 3;
1686
	x = (devicewidth(NULL) - w) / 3;
1687
	y = (deviceheight(NULL) - h) / 3 ;
1687
	y = (deviceheight(NULL) - h) / 3 ;
1688
    }
1688
    }
1689
    c = (dataeditor) newwindow((char *) title, rect(x, y, w, h),
1689
    c = (dataeditor) newwindow(title, rect(x, y, w, h),
1690
			       Document | StandardWindow | Menubar |
1690
			       Document | StandardWindow | Menubar |
1691
			       VScrollbar | HScrollbar | TrackMouse);
1691
			       VScrollbar | HScrollbar | TrackMouse);
1692
    if (!c) {
1692
    if (!c) {
1693
         freeConsoleData(DE->p);
1693
         freeConsoleData(DE->p);
1694
         return NULL;
1694
         return NULL;