mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(function-key-map): Add bindings for C- and S- cursor

Browse Source 
motion as seen on my Mac OS X xterms.
This commit is contained in:
Stefan Monnier 2004-09-08 02:41:53 +00:00
parent f844ba4efd
commit 4dab1ffd06
1 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
lisp/term/xterm.el
View File

@ -1,6 +1,6 @@
;;; xterm.el --- define function key sequences and standard colors for xterm
;; Copyright (C) 1995, 2002 Free Software Foundation, Inc.
;; Copyright (C) 1995, 2002, 2004 Free Software Foundation, Inc.
;; Author: FSF
;; Keywords: terminals
@ -51,6 +51,16 @@
(define-key map "\e[24~" [f12])
(define-key map "\e[29~" [print])
(define-key map "\e[1;2A" [S-up])
(define-key map "\e[1;2B" [S-down])
(define-key map "\e[1;2C" [S-right])
(define-key map "\e[1;2D" [S-left])
(define-key map "\e[1;5A" [C-up])
(define-key map "\e[1;5B" [C-down])
(define-key map "\e[1;5C" [C-right])
(define-key map "\e[1;5D" [C-left])
(define-key map "\e[2;2~" [S-insert])
(define-key map "\e[3;2~" [S-delete])
(define-key map "\e[5;2~" [S-prior])
@ -236,5 +246,5 @@ versions of xterm."
;; This recomputes all the default faces given the colors we've just set up.
(tty-set-up-initial-frame-faces)
;;; arch-tag: 12e7ebdd-1e6c-4b25-b0f9-35ace25e855a
;; arch-tag: 12e7ebdd-1e6c-4b25-b0f9-35ace25e855a
;;; xterm.el ends here