joe-3.1jupp31.tgz (die zweite Klappeā€¦)
[alioth/jupp.git] / cmd.c
diff --git a/cmd.c b/cmd.c
index 2e5ed6c..8989fd2 100644 (file)
--- a/cmd.c
+++ b/cmd.c
@@ -1,4 +1,4 @@
-/* $MirOS: contrib/code/jupp/cmd.c,v 1.15 2016/10/08 14:58:45 tg Exp $ */
+/* $MirOS: contrib/code/jupp/cmd.c,v 1.17 2017/08/08 21:39:28 tg Exp $ */
 /*
  *     Command execution
  *     Copyright
@@ -93,11 +93,11 @@ static int unop(void)
 }
 
 CMD cmds[] = {
+       {US "abendjoe", TYPETW + TYPEPW + TYPEMENU + TYPEQW, uabendjoe, NULL, 0, NULL},
        {US "abort", TYPETW + TYPEPW + TYPEMENU + TYPEQW, uabort, NULL, 0, NULL},
        {US "abortbuf", TYPETW, uabortbuf, NULL, 0, NULL},
        {US "arg", TYPETW + TYPEPW + TYPEMENU + TYPEQW, uarg, NULL, 0, NULL},
        {US "ask", TYPETW + TYPEPW, uask, NULL, 0, NULL},
-       {US "uarg", TYPETW + TYPEPW + TYPEMENU + TYPEQW, uuarg, NULL, 0, NULL},
        {US "backs", TYPETW + TYPEPW + ECHKXCOL + EFIXXCOL + EMINOR + EKILL + EMOD, ubacks, NULL, 1, US "delch"},
        {US "backsmenu", TYPEMENU, umbacks, NULL, 1, NULL},
        {US "backw", TYPETW + TYPEPW + ECHKXCOL + EFIXXCOL + EKILL + EMOD, ubackw, NULL, 1, US "delw"},
@@ -120,12 +120,12 @@ CMD cmds[] = {
        {US "byte", TYPETW + TYPEPW, ubyte, NULL, 0, NULL},
        {US "cancel", TYPETW + TYPEPW + TYPEMENU + TYPEQW, ucancel, NULL, 0, NULL},
        {US "center", TYPETW + TYPEPW + EFIXXCOL + EMOD, ucenter, NULL, 1, NULL},
-       {US "ctrl", TYPETW + TYPEPW + EMOD, uctrl, NULL, 0, NULL},
        {US "col", TYPETW + TYPEPW, ucol, NULL, 0, NULL},
        {US "complete", TYPEPW + EMINOR + EMOD, ucmplt, NULL, 0, NULL},
        {US "copy", TYPETW + TYPEPW, ucopy, NULL, 0, NULL},
        {US "crawll", TYPETW + TYPEPW, ucrawll, NULL, 1, US "crawlr"},
        {US "crawlr", TYPETW + TYPEPW, ucrawlr, NULL, 1, US "crawll"},
+       {US "ctrl", TYPETW + TYPEPW + EMOD, uctrl, NULL, 0, NULL},
        {US "delbol", TYPETW + TYPEPW + EFIXXCOL + EKILL + EMOD, udelbl, NULL, 1, US "deleol"},
        {US "delch", TYPETW + TYPEPW + ECHKXCOL + EFIXXCOL + EMINOR + EKILL + EMOD, udelch, NULL, 1, US "backs"},
        {US "deleol", TYPETW + TYPEPW + EKILL + EMOD, udelel, NULL, 1, US "delbol"},
@@ -148,23 +148,23 @@ CMD cmds[] = {
        {US "ffirst", TYPETW + TYPEPW, pffirst, NULL, 0, NULL},
        {US "filt", TYPETW + TYPEPW + EMOD + EBLOCK, ufilt, NULL, 0, NULL},
        {US "finish", TYPETW + TYPEPW + EMOD, ufinish, NULL, 1, NULL},
+       {US "fmtblk", TYPETW + EMOD + EFIXXCOL + EBLOCK, ufmtblk, NULL, 1, NULL},
        {US "fnext", TYPETW + TYPEPW, pfnext, NULL, 1, NULL},
        {US "format", TYPETW + TYPEPW + EFIXXCOL + EMOD, uformat, NULL, 1, NULL},
-       {US "fmtblk", TYPETW + EMOD + EFIXXCOL + EBLOCK, ufmtblk, NULL, 1, NULL},
        {US "fwrdc", TYPETW + TYPEPW, ufwrdc, NULL, 1, US "bkwdc"},
        {US "gomark", TYPETW + TYPEPW + EMOVE, ugomark, NULL, 0, NULL},
        {US "groww", TYPETW, ugroww, NULL, 1, US "shrinkw"},
-       {US "isrch", TYPETW + TYPEPW, uisrch, NULL, 0, NULL},
-       {US "killjoe", TYPETW + TYPEPW + TYPEMENU + TYPEQW, ukilljoe, NULL, 0, NULL},
-       {US "killproc", TYPETW + TYPEPW, ukillpid, NULL, 0, NULL},
        {US "help", TYPETW + TYPEPW + TYPEQW, u_help, NULL, 0, NULL},
        {US "helpcard", TYPETW + TYPEPW + TYPEQW, u_helpcard, NULL, 0, NULL},
-       {US "home", TYPETW + TYPEPW + EFIXXCOL, uhome, NULL, 0, NULL},
        {US "hnext", TYPETW + TYPEPW + TYPEQW, u_help_next, NULL, 0, NULL},
+       {US "home", TYPETW + TYPEPW + EFIXXCOL, uhome, NULL, 0, NULL},
        {US "hprev", TYPETW + TYPEPW + TYPEQW, u_help_prev, NULL, 0, NULL},
        {US "insc", TYPETW + TYPEPW + EFIXXCOL + EMOD, uinsc, NULL, 1, US "delch"},
        {US "insf", TYPETW + TYPEPW + EMOD, uinsf, NULL, 0, NULL},
+       {US "isrch", TYPETW + TYPEPW, uisrch, NULL, 0, NULL},
        {US "keymap", TYPETW + TYPEPW, ukeymap, NULL, 0, NULL},
+       {US "killjoe", TYPETW + TYPEPW + TYPEMENU + TYPEQW, ukilljoe, NULL, 0, NULL},
+       {US "killproc", TYPETW + TYPEPW, ukillpid, NULL, 0, NULL},
        {US "lindent", TYPETW + TYPEPW + EFIXXCOL + EMOD + EBLOCK, ulindent, NULL, 1, US "rindent"},
        {US "line", TYPETW + TYPEPW, uline, NULL, 0, NULL},
        {US "lose", TYPETW + TYPEPW, ulose, NULL, 0, NULL},
@@ -199,12 +199,12 @@ CMD cmds[] = {
        {US "pgupmenu", TYPEMENU, umpgup, NULL, 1, US "pgdnmenu"},
        {US "picokill", TYPETW + TYPEPW + EFIXXCOL + EKILL + EMOD, upicokill, NULL, 1, NULL},
        {US "play", TYPETW + TYPEPW + TYPEMENU + TYPEQW, uplay, NULL, 1, NULL}, /* EFIXX? */
+       {US "pop", TYPETW + TYPEPW + TYPEMENU + TYPEQW, upop, NULL, 0, NULL},
        {US "prevpos", TYPETW + TYPEPW + EPOS + EMID + EFIXXCOL, uprevpos, NULL, 1, US "nextpos"},
        {US "prevw", TYPETW + TYPEPW + TYPEMENU + TYPEQW, uprevw, NULL, 1, US "nextw"},
        {US "prevword", TYPETW + TYPEPW + EFIXXCOL + ECHKXCOL, u_goto_prev, NULL, 1, US "nextword"},
        {US "prverr", TYPETW, uprverr, NULL, 1, US "nxterr"},
        {US "psh", TYPETW + TYPEPW + TYPEMENU + TYPEQW, upsh, NULL, 0, NULL},
-       {US "pop", TYPETW + TYPEPW + TYPEMENU + TYPEQW, upop, NULL, 0, NULL},
        {US "qrepl", TYPETW + TYPEPW + EMOD, pqrepl, NULL, 0, NULL},
        {US "query", TYPETW + TYPEPW + TYPEMENU + TYPEQW, uquery, NULL, 0, NULL},
        {US "querysave", TYPETW, uquerysave, NULL, 0, NULL},
@@ -215,11 +215,11 @@ CMD cmds[] = {
        {US "retype", TYPETW + TYPEPW + TYPEMENU + TYPEQW, uretyp, NULL, 0, NULL},
        {US "rfirst", TYPETW + TYPEPW, prfirst, NULL, 0, NULL},
        {US "rindent", TYPETW + TYPEPW + EFIXXCOL + EMOD + EBLOCK, urindent, NULL, 1, US "lindent"},
-       {US "run", TYPETW + TYPEPW, urun, NULL, 0, NULL},
        {US "rsrch", TYPETW + TYPEPW, ursrch, NULL, 0, NULL},
        {US "rtarw", TYPETW + TYPEPW /* + EFIXXCOL */, u_goto_right, NULL, 1, US "ltarw"}, /* EFIX removed for picture mode */
        {US "rtarwmenu", TYPEMENU, umrtarw, NULL, 1, US "ltarwmenu"},
        {US "rtn", TYPETW + TYPEPW + TYPEMENU + TYPEQW + EMOD, urtn, NULL, 1, NULL},
+       {US "run", TYPETW + TYPEPW, urun, NULL, 0, NULL},
        {US "rvmatch", TYPETW + TYPEPW + EFIXXCOL, urvmatch, NULL, 0, NULL},
        {US "save", TYPETW, usave, NULL, 0, NULL},
        {US "scratch", TYPETW + TYPEPW, uscratch, NULL, 0, NULL},
@@ -244,14 +244,15 @@ CMD cmds[] = {
        {US "tw1", TYPETW + TYPEPW + TYPEQW + TYPEMENU, utw1, NULL, 0, NULL},
        {US "txt", TYPETW + TYPEPW, utxt, NULL, 0, NULL},
        {US "type", TYPETW + TYPEPW + TYPEQW + TYPEMENU + EMINOR + EMOD, utype, NULL, 1, US "backs"},
+       {US "uarg", TYPETW + TYPEPW + TYPEMENU + TYPEQW, uuarg, NULL, 0, NULL},
        {US "undo", TYPETW + TYPEPW + EFIXXCOL, uundo, NULL, 1, US "redo"},
        {US "uparw", TYPETW + TYPEPW + EMOVE, uuparw, NULL, 1, US "dnarw"},
        {US "uparwmenu", TYPEMENU, umuparw, NULL, 1, US "dnarwmenu"},
        {US "upper", TYPETW + TYPEPW + EMOD + EBLOCK, uupper, NULL, 0, NULL},
        {US "upslide", TYPETW + TYPEPW + TYPEMENU + TYPEQW + EMOVE, uupslide, NULL, 1, US "dnslide"},
        {US "yank", TYPETW + TYPEPW + EFIXXCOL + EMOD, uyank, NULL, 1, NULL},
-       {US "yapp", TYPETW + TYPEPW + EKILL, uyapp, NULL, 0, NULL},
-       {US "yankpop", TYPETW + TYPEPW + EFIXXCOL + EMOD, uyankpop, NULL, 1, NULL}
+       {US "yankpop", TYPETW + TYPEPW + EFIXXCOL + EMOD, uyankpop, NULL, 1, NULL},
+       {US "yapp", TYPETW + TYPEPW + EKILL, uyapp, NULL, 0, NULL}
 };
 
 /* Execute a command n with key k */