The R Project SVN R

Rev

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

Rev 6626 Rev 6994
Line 797... Line 797...
797
 
797
 
798
static void normalkeyin(control c,int k)
798
static void normalkeyin(control c,int k)
799
FBEGIN
799
FBEGIN
800
    int st;
800
    int st;
801
 
801
 
802
    st = getkeystate();
802
    st = ggetkeystate();
803
    if ((p->chbrk) && (k == p->chbrk) &&
803
    if ((p->chbrk) && (k == p->chbrk) &&
804
	((!p->modbrk) || ((p->modbrk) && (st == p->modbrk)))) {
804
	((!p->modbrk) || ((p->modbrk) && (st == p->modbrk)))) {
805
	p->fbrk(c);
805
	p->fbrk(c);
806
	return;
806
	return;
807
    }
807
    }
Line 864... Line 864...
864
 
864
 
865
static void ctrlkeyin(control c, int key)
865
static void ctrlkeyin(control c, int key)
866
FBEGIN
866
FBEGIN
867
    int st;
867
    int st;
868
 
868
 
869
    st = getkeystate();
869
    st = ggetkeystate();
870
    if ((p->chbrk) && (key == p->chbrk) &&
870
    if ((p->chbrk) && (key == p->chbrk) &&
871
	((!p->modbrk) || ((p->modbrk) && (st == p->modbrk)))) {
871
	((!p->modbrk) || ((p->modbrk) && (st == p->modbrk)))) {
872
	p->fbrk(c);
872
	p->fbrk(c);
873
	return;
873
	return;
874
    }
874
    }
Line 1455... Line 1455...
1455
    strcat(s,"     Use Shift+Del (or Ctrl+C) to copy the marked text to the clipboard and\n");
1455
    strcat(s,"     Use Shift+Del (or Ctrl+C) to copy the marked text to the clipboard and\n");
1456
    strcat(s,"     Shift+Ins (or Ctrl+V or Ctrl+Y) to paste the content of the clipboard (if any)\n");
1456
    strcat(s,"     Shift+Ins (or Ctrl+V or Ctrl+Y) to paste the content of the clipboard (if any)\n");
1457
    strcat(s,"     to the console, Ctrl+X first copy then paste\n\n");
1457
    strcat(s,"     to the console, Ctrl+X first copy then paste\n\n");
1458
    strcat(s,"Note: Console is updated only when some input is required.\n");
1458
    strcat(s,"Note: Console is updated only when some input is required.\n");
1459
    strcat(s,"  Use Ctrl+W to toggle this feature off/on.\n\n");
1459
    strcat(s,"  Use Ctrl+W to toggle this feature off/on.\n\n");
1460
    strcat(s,"Use ESC to stop the interpreter.");
1460
    strcat(s,"Use ESC to stop the interpreter.\n\n");
-
 
1461
    strcat(s,"Standard Windows hotkeys can be used to switch to the\n");
-
 
1462
    strcat(s,"graphics device (Ctrl+Tab or Ctrl+F6 in MDI, Alt+Tab in SDI)");
1461
    askok(s);
1463
    askok(s);
1462
}
1464
}
1463
 
1465
 
1464
#define PAGERMAXKEPT 12
1466
#define PAGERMAXKEPT 12
1465
#define PAGERMAXTITLE 128
1467
#define PAGERMAXTITLE 128