[5668] back tab key binding

[Gavin D. Smith]

Revision: 5668
          http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=5668
Author:   gavin
Date:     2014-06-17 18:51:40 +0000 (Tue, 17 Jun 2014)
Log Message:
-----------
back tab key binding

Modified Paths:
--------------
    trunk/ChangeLog
    trunk/doc/info-stnd.texi
    trunk/info/infodoc.c
    trunk/info/infokey.h
    trunk/info/infomap.c
    trunk/info/terminal.c
    trunk/info/terminal.h

Modified: trunk/ChangeLog
===================================================================
--- trunk/ChangeLog     2014-06-15 15:40:40 UTC (rev 5667)
+++ trunk/ChangeLog     2014-06-17 18:51:40 UTC (rev 5668)
@@ -1,3 +1,16 @@
+2014-06-17  Gavin Smith  <address@hidden>
+
+       * info/terminal.c (term_bt): New variable.
+       (terminal_initialize_terminal): Initialize term_bt from termcap "bt"
+       capability.
+       * info/infokey.h (SK_BACK_TAB): New symbol.
+       * info/infomap.c (default_emacs_like_info_keys): Bind back tab to
+       move-to-prev-xref.
+       (decode_keys): Check for SK_BACK_TAB in binding.
+       * info/infodoc.c (pretty_keyseq_internal): Add "BackTab" to key names
+       for help window.
+       * doc/info-stnd.texi (Selecting Xrefs): Document back tab binding.
+
 2014-06-15  Gavin Smith  <address@hidden>
 
        * info/t/search-after-tag.sh: New test.

Modified: trunk/doc/info-stnd.texi
===================================================================
--- trunk/doc/info-stnd.texi    2014-06-15 15:40:40 UTC (rev 5667)
+++ trunk/doc/info-stnd.texi    2014-06-17 18:51:40 UTC (rev 5668)
@@ -1417,6 +1417,7 @@
 (@code{select-reference-this-line}) to select the menu or note reference.
 
 @item @kbd{M-TAB} (@code{move-to-prev-xref})
address@hidden @kbd{BackTab}
 @itemx @address@hidden (on DOS/Windows only)
 @kindex M-TAB, in Info windows
 @findex move-to-prev-xref
@@ -1425,8 +1426,8 @@
 
 @kindex Shift-TAB, in Info windows
 @kindex BackTab, in Info windows
-On DOS/Windows only, the @address@hidden key is an alias for
address@hidden@key{TAB}}.  This key is sometimes called @samp{BackTab}.
+The @kbd{BackTab} key can be produced on some terminals with
address@hidden@key{TAB}}. 
 
 @item @key{RET} (@code{select-reference-this-line})
 @itemx @kbd{M-g}, vi-like operation

Modified: trunk/info/infodoc.c
===================================================================
--- trunk/info/infodoc.c        2014-06-15 15:40:40 UTC (rev 5667)
+++ trunk/info/infodoc.c        2014-06-17 18:51:40 UTC (rev 5668)
@@ -828,6 +828,11 @@
       strcpy(rep, "Right");
       keyseq += strlen(term_kr);
     }
+  else if (term_bt && strncmp(keyseq, term_bt, strlen(term_bt)) == 0)
+    {
+      strcpy(rep, "BackTab");
+      keyseq += strlen(term_kr);
+    }
   else
     {
       strcpy (rep, pretty_keyname (keyseq[0]));

Modified: trunk/info/infokey.h
===================================================================
--- trunk/info/infokey.h        2014-06-15 15:40:40 UTC (rev 5667)
+++ trunk/info/infokey.h        2014-06-17 18:51:40 UTC (rev 5668)
@@ -1,7 +1,7 @@
 /* infokey.h -- Custom keystroke definition support.
    $Id$
 
-   Copyright 1999, 2002, 2007, 2013 Free Software Foundation, Inc.
+   Copyright 1999, 2002, 2007, 2013, 2014 Free Software Foundation, Inc.
 
    This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
@@ -124,4 +124,5 @@
 #define SK_CTL_LEFT_ARROW      11
 #define SK_CTL_RIGHT_ARROW     12
 #define SK_CTL_DELETE          13
+#define SK_BACK_TAB            14
 #define SK_LITERAL             40

Modified: trunk/info/infomap.c
===================================================================
--- trunk/info/infomap.c        2014-06-15 15:40:40 UTC (rev 5667)
+++ trunk/info/infomap.c        2014-06-17 18:51:40 UTC (rev 5668)
@@ -438,6 +438,7 @@
   ESC, SK_ESCAPE, SK_LEFT_ARROW, NUL,     A_info_backward_word,
   ESC, '\033', 'O', 'D', NUL,             A_info_backward_word,
   ESC, '\033', '[', 'D', NUL,             A_info_backward_word,
+  SK_ESCAPE, SK_BACK_TAB, NUL,            A_info_move_to_prev_xref,
   
   /* We want help to report q, not C-x C-c, etc.  */
   'q', NUL,                       A_info_quit,
@@ -1075,6 +1076,7 @@
            case SK_END:            t = term_ke; break;
            case SK_DELETE:         t = term_kx; break;
            case SK_INSERT:         t = term_ki; break;
+           case SK_BACK_TAB:       t = term_bt; break;
            case SK_LITERAL:
            default:                t = lit; break;
            }

Modified: trunk/info/terminal.c
===================================================================
--- trunk/info/terminal.c       2014-06-15 15:40:40 UTC (rev 5667)
+++ trunk/info/terminal.c       2014-06-17 18:51:40 UTC (rev 5668)
@@ -223,6 +223,7 @@
 char *term_kD = NULL;  /* delete */
 char *term_ki = NULL;  /* ins */
 char *term_kx = NULL;  /* del */
+char *term_bt = NULL;  /* back tab */
 
 /* Move the cursor to the terminal location of X and Y. */
 void
@@ -644,6 +645,7 @@
   term_ke = tgetstr ("@7", &buffer);
 
   term_kD = tgetstr ("kD", &buffer);
+  term_bt = tgetstr ("bt", &buffer);
 
   /* If this terminal is not cursor addressable, then it is really dumb. */
   if (!term_goto)

Modified: trunk/info/terminal.h
===================================================================
--- trunk/info/terminal.h       2014-06-15 15:40:40 UTC (rev 5667)
+++ trunk/info/terminal.h       2014-06-17 18:51:40 UTC (rev 5668)
@@ -1,7 +1,7 @@
 /* terminal.h -- The external interface to terminal I/O.
    $Id$
 
-   Copyright 1993, 1996, 1997, 2001, 2002, 2004, 2007, 2013
+   Copyright 1993, 1996, 1997, 2001, 2002, 2004, 2007, 2013, 2014
    Free Software Foundation, Inc.
 
    This program is free software: you can redistribute it and/or modify
@@ -125,5 +125,6 @@
 extern char *term_ke, *term_kh;
 extern char *term_kx, *term_ki;
 extern char *term_kD;
+extern char *term_bt;
 
 #endif /* !TERMINAL_H */