Skip to content

Instantly share code, notes, and snippets.

@tavisrudd

tavisrudd/shift-arrows.el

Created February 3, 2012 03:01
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save tavisrudd/1727373 to your computer and use it in GitHub Desktop.
Save tavisrudd/1727373 to your computer and use it in GitHub Desktop.
Download ZIP
shift-arrow key support for emacs inside of gnu screen
Raw
shift-arrows.el
(define-key global-map "\eO2D" (kbd "S-<left>"))
(define-key global-map "\eO2C" (kbd "S-<right>"))
(define-key global-map "\eO2A" (kbd "S-<up>"))
(define-key global-map "\eO2B" (kbd "S-<down>"))
(define-key global-map "\e[1;10D" (kbd "M-S-<left>"))
(define-key global-map "\e[1;10C" (kbd "M-S-<right>"))
(define-key global-map "\e[1;10A" (kbd "M-S-<up>"))
(define-key global-map "\e[1;10B" (kbd "M-S-<down>"))
@tavisrudd
Copy link
Author

the actual escape codes might be different but you can find them via M-x view-lossage

@mattkotys
Copy link

Very helpful - thanks!

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment