]> code.delx.au - gnu-emacs/commitdiff
Meta + shift + Fn combos are recognized by xterm>=216.
authorTino Calancha <f92capac@gmail.com>
Mon, 29 Feb 2016 06:07:59 +0000 (17:07 +1100)
committerLars Ingebrigtsen <larsi@gnus.org>
Mon, 29 Feb 2016 06:07:59 +0000 (17:07 +1100)
* lisp/term/xterm.el (xterm-alternatives-map): Meta + shift +
Fn combos are recognized by xterm>=216 (bug#22837).

lisp/term/xterm.el

index e06423ccfdddb85fe35d894fc230d9f6c94e0a3e..5a38ebe8e45715f23c4d89f7b88a8314a13e2cc2 100644 (file)
@@ -590,6 +590,19 @@ string bytes that can be copied is 3/4 of this value."
     (define-key map [f59] [M-f11])
     (define-key map [f60] [M-f12])
 
+    (define-key map [f61] [M-S-f1])
+    (define-key map [f62] [M-S-f2])
+    (define-key map [f63] [M-S-f3])
+    (define-key map [f64] [M-S-f4])
+    (define-key map [f65] [M-S-f5])
+    (define-key map [f66] [M-S-f6])
+    (define-key map [f67] [M-S-f7])
+    (define-key map [f68] [M-S-f8])
+    (define-key map [f69] [M-S-f9])
+    (define-key map [f70] [M-S-f10])
+    (define-key map [f71] [M-S-f11])
+    (define-key map [f72] [M-S-f12])
+
     map)
   "Keymap of possible alternative meanings for some keys.")