Merge pull request #80 from gleber/add-missing-keys-to-prelude-restore

Add missing keys to restore
This commit is contained in:
Bozhidar Batsov 2012-02-24 08:09:55 -08:00
commit fbf59d53e7

View file

@ -352,10 +352,12 @@ there's a region, all lines that region covers will be duplicated."
(defun prelude-restore-arrow-keys () (defun prelude-restore-arrow-keys ()
"Restores arrow keys navigation in buffers." "Restores arrow keys navigation in buffers."
(interactive) (interactive)
(global-set-key (kbd "<up>") 'previous-line) (global-set-key [up] 'previous-line)
(global-set-key (kbd "<down>") 'next-line) (global-set-key [down] 'next-line)
(global-set-key (kbd "<left>") 'backward-char) (global-set-key [left] 'backward-char)
(global-set-key (kbd "<right>") 'forward-char) (global-set-key [right] 'forward-char)
(global-set-key [M-right] 'right-word)
(global-set-key [M-left] 'left-word)
(message "Arrow keys navigation in buffers in now allowed.")) (message "Arrow keys navigation in buffers in now allowed."))
(provide 'prelude-core) (provide 'prelude-core)