|
Line 0
Link Here
|
|
|
1 |
--- guix11/xdialog.c.orig Tue Jul 6 20:07:34 1999 |
| 2 |
+++ guix11/xdialog.c Wed Sep 15 17:16:51 1999 |
| 3 |
@@ -802,7 +802,9 @@ |
| 4 |
switch (key) |
| 5 |
{ |
| 6 |
case XK_Left: |
| 7 |
+ case XK_KP_Left: |
| 8 |
case XK_Right: |
| 9 |
+ case XK_KP_Right: |
| 10 |
/* find the current value */ |
| 11 |
val = dia->field[dia->current].value; |
| 12 |
i = CHARlen(val); |
| 13 |
@@ -813,7 +815,7 @@ |
| 14 |
} |
| 15 |
|
| 16 |
/* move left or right */ |
| 17 |
- if (key == XK_Left) |
| 18 |
+ if (key == XK_Left || key == XK_KP_Left) |
| 19 |
this--; |
| 20 |
else |
| 21 |
this++; |
| 22 |
@@ -869,11 +871,13 @@ |
| 23 |
switch (key) |
| 24 |
{ |
| 25 |
case XK_Left: |
| 26 |
+ case XK_KP_Left: |
| 27 |
if (dia->cursor > 0) |
| 28 |
dia->cursor--; |
| 29 |
break; |
| 30 |
|
| 31 |
case XK_Right: |
| 32 |
+ case XK_KP_Right: |
| 33 |
if (dia->cursor < origlen) |
| 34 |
dia->cursor++; |
| 35 |
break; |
| 36 |
@@ -898,10 +902,12 @@ |
| 37 |
break; |
| 38 |
|
| 39 |
case XK_Home: |
| 40 |
+ case XK_KP_Home: |
| 41 |
dia->cursor = 0; |
| 42 |
break; |
| 43 |
|
| 44 |
case XK_End: |
| 45 |
+ case XK_KP_End: |
| 46 |
dia->cursor = CHARlen(dia->field[dia->current].value); |
| 47 |
break; |
| 48 |
|
| 49 |
@@ -916,6 +922,7 @@ |
| 50 |
|
| 51 |
case '\177': |
| 52 |
case XK_Delete: |
| 53 |
+ case XK_KP_Delete: |
| 54 |
if (dia->cursor < origlen) |
| 55 |
CHARcpy(&orig[dia->cursor], &orig[dia->cursor + 1]); |
| 56 |
break; |
| 57 |
@@ -955,6 +962,7 @@ |
| 58 |
case '\n': |
| 59 |
case XK_Linefeed: |
| 60 |
case XK_Return: |
| 61 |
+ case XK_KP_Enter: |
| 62 |
/* store the values of all options */ |
| 63 |
eventfocus((GUIWIN *)dia->xw); |
| 64 |
for (i = 0; i < dia->nfields; i++) |
| 65 |
@@ -991,10 +999,12 @@ |
| 66 |
break; |
| 67 |
|
| 68 |
case XK_Up: |
| 69 |
+ case XK_KP_Up: |
| 70 |
makecurrent(dia, dia->current - 1); |
| 71 |
break; |
| 72 |
|
| 73 |
case XK_Down: |
| 74 |
+ case XK_KP_Down: |
| 75 |
makecurrent(dia, dia->current + 1); |
| 76 |
break; |
| 77 |
|
| 78 |
--- guix11/guix11.c.orig Tue Jul 6 20:07:34 1999 |
| 79 |
+++ guix11/guix11.c Wed Sep 15 17:23:32 1999 |
| 80 |
@@ -152,16 +152,27 @@ |
| 81 |
} keys[] = |
| 82 |
{ |
| 83 |
{ "<Up>", XK_Up, "k", MAP_ALL }, |
| 84 |
+ { "<KP_Up>", XK_KP_Up, "k", MAP_ALL }, |
| 85 |
{ "<Down>", XK_Down, "j", MAP_ALL }, |
| 86 |
+ { "<KP_Down>", XK_KP_Down, "j", MAP_ALL }, |
| 87 |
{ "<Left>", XK_Left, "h", MAP_ALL }, |
| 88 |
+ { "<KP_Left>", XK_KP_Left, "h", MAP_ALL }, |
| 89 |
{ "<Right>", XK_Right, "l", MAP_ALL }, |
| 90 |
+ { "<KP_Right>", XK_KP_Right, "l", MAP_ALL }, |
| 91 |
{ "<Prior>", XK_Prior, "\002", MAP_ALL_VISUAL }, |
| 92 |
+ { "<KP_Prior>", XK_KP_Prior, "\002", MAP_ALL_VISUAL }, |
| 93 |
{ "<Next>", XK_Next, "\006", MAP_ALL_VISUAL }, |
| 94 |
+ { "<KP_Next>", XK_KP_Next, "\006", MAP_ALL_VISUAL }, |
| 95 |
{ "<Home>", XK_Home, "^", MAP_ALL }, |
| 96 |
+ { "<KP_Home>", XK_KP_Home, "^", MAP_ALL }, |
| 97 |
{ "<Begin>", XK_Begin, "^", MAP_ALL }, |
| 98 |
+ { "<KP_Begin>", XK_KP_Begin, "^", MAP_ALL }, |
| 99 |
{ "<End>", XK_End, "$", MAP_ALL }, |
| 100 |
+ { "<KP_End>", XK_KP_End, "$", MAP_ALL }, |
| 101 |
{ "<Insert>", XK_Insert, "i", MAP_ALL }, |
| 102 |
+ { "<KP_Insert>",XK_KP_Insert, "i", MAP_ALL }, |
| 103 |
{ "<Delete>", XK_Delete, "x", MAP_ALL }, |
| 104 |
+ { "<KP_Delete>",XK_KP_Delete, "x", MAP_ALL }, |
| 105 |
{ "<Undo>", XK_Undo, "u", MAP_ALL_VISUAL }, |
| 106 |
{ "<Help>", XK_Help, ":help\r",MAP_ALL_VISUAL }, |
| 107 |
{ "<Multi_key>",XK_Multi_key, "\013", MAP_INPUT|MAP_OPEN } |