static void pagercopy(control m) { control c = getdata(m); if (consolecancopy(c)) consolecopy(c); else R_ShowMessage(G_("No selection")); }
static void menucopy(control m) { if (consolecancopy(RConsole)) consolecopy(RConsole); else askok(G_("No selection")); /* show(RConsole); */ }
static void menucopypaste(control m) { if (consolecancopy(RConsole)) { consolecopy(RConsole); consolepaste(RConsole); } else askok(G_("No selection")); /* show(RConsole); */ }
static void pagerpastecmds(control m) { control c = getdata(m); if (CharacterMode != RGui) { R_ShowMessage(G_("No RGui console to paste to")); return; } if (!consolecancopy(c)) { R_ShowMessage(G_("No selection")); return; } else { consolecopy(c); } if (consolecanpaste(RConsole)) { consolepastecmds(RConsole); show(RConsole); } }