changeset 61591:b015e12637bc

(struct keys): Add support for shifted keys.
author Dan Nicolaescu <dann@ics.uci.edu>
date Sun, 17 Apr 2005 01:37:38 +0000
parents 005901da292a
children 7c224837fcfe
files src/ChangeLog src/term.c
diffstat 2 files changed, 24 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/ChangeLog	Sat Apr 16 21:00:47 2005 +0000
+++ b/src/ChangeLog	Sun Apr 17 01:37:38 2005 +0000
@@ -1,3 +1,7 @@
+2005-04-16  Dan Nicolaescu  <dann@ics.uci.edu>
+
+	* term.c (struct keys): Add support for shifted keys.
+
 2005-04-16  Richard M. Stallman  <rms@gnu.org>
 
 	* xdisp.c (with_echo_area_buffer): Delete WHICH < 0 case.
--- a/src/term.c	Sat Apr 16 21:00:47 2005 +0000
+++ b/src/term.c	Sun Apr 17 01:37:38 2005 +0000
@@ -1451,7 +1451,26 @@
   {"k6", "f6"},
   {"k7", "f7"},
   {"k8", "f8"},
-  {"k9", "f9"}
+  {"k9", "f9"},
+
+  {"&0", "S-cancel"},    /*shifted cancel key*/
+  {"&9", "S-begin"},     /*shifted begin key*/
+  {"*0", "S-find"},      /*shifted find key*/
+  {"*1", "S-execute"},   /*shifted execute? actually shifted command key*/
+  {"*4", "S-delete"},    /*shifted delete-character key*/
+  {"*7", "S-end"},       /*shifted end key*/
+  {"*8", "S-clearline"}, /*shifted clear-to end-of-line key*/
+  {"#1", "S-help"},      /*shifted help key*/
+  {"#2", "S-home"},      /*shifted home key*/
+  {"#3", "S-insert"},    /*shifted insert-character key*/
+  {"#4", "S-left"},      /*shifted left-arrow key*/
+  {"%d", "S-menu"},      /*shifted menu? actually shifted options key*/
+  {"%c", "S-next"},      /*shifted next key*/
+  {"%e", "S-prior"},     /*shifted previous key*/
+  {"%f", "S-print"},     /*shifted print key*/
+  {"%g", "S-redo"},      /*shifted redo key*/
+  {"%i", "S-right"},     /*shifted right-arrow key*/
+  {"!3", "S-undo"}       /*shifted undo key*/
   };
 
 static char **term_get_fkeys_arg;