jt/emacs-prelude
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixed #79 - Prelude's keybindings are after all just user keybindings

Browse source
This commit is contained in:
Bozhidar Batsov 2012-03-09 16:24:25 +02:00
parent 530fe743b3
commit 7705c54aaa
1 changed files with 12 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

24
modules/prelude-mode.el
View file

@ -34,23 +34,23 @@
(defvar prelude-mode-map (defvar prelude-mode-map
(let ((map (make-sparse-keymap))) (let ((map (make-sparse-keymap)))
(define-key map (kbd "C-c C-p o") 'prelude-open-with) (define-key map (kbd "C-c o") 'prelude-open-with)
(define-key map (kbd "C-c C-p g") 'prelude-google) (define-key map (kbd "C-c g") 'prelude-google)
;; mimic popular IDEs binding, note that it doesn't work in a terminal session ;; mimic popular IDEs binding, note that it doesn't work in a terminal session
(define-key map [(shift return)] 'prelude-insert-empty-line) (define-key map [(shift return)] 'prelude-insert-empty-line)
(define-key map [(control shift up)] 'prelude-move-line-up) (define-key map [(control shift up)] 'prelude-move-line-up)
(define-key map [(control shift down)] 'prelude-move-line-down) (define-key map [(control shift down)] 'prelude-move-line-down)
(define-key map (kbd "C-c C-p n") 'prelude-cleanup-buffer) (define-key map (kbd "C-c n") 'prelude-cleanup-buffer)
(define-key map (kbd "C-c C-p f") 'prelude-recentf-ido-find-file) (define-key map (kbd "C-c f") 'prelude-recentf-ido-find-file)
(define-key map (kbd "C-c C-p i") 'prelude-ido-goto-symbol) (define-key map (kbd "C-c i") 'prelude-ido-goto-symbol)
(define-key map (kbd "C-M-\\") 'prelude-indent-region-or-buffer) (define-key map (kbd "C-M-\\") 'prelude-indent-region-or-buffer)
(define-key map (kbd "C-c C-p h") 'prelude-view-url) (define-key map (kbd "C-c u") 'prelude-view-url)
(define-key map (kbd "C-c C-p e") 'prelude-eval-and-replace) (define-key map (kbd "C-c e") 'prelude-eval-and-replace)
(define-key map (kbd "C-c C-p s") 'prelude-swap-windows) (define-key map (kbd "C-c s") 'prelude-swap-windows)
(define-key map (kbd "C-c C-p d") 'prelude-duplicate-current-line-or-region) (define-key map (kbd "C-c d") 'prelude-duplicate-current-line-or-region)
(define-key map (kbd "C-c C-p r") 'prelude-rename-file-and-buffer) (define-key map (kbd "C-c r") 'prelude-rename-file-and-buffer)
(define-key map (kbd "C-c C-p t") 'prelude-visit-term-buffer) (define-key map (kbd "C-c t") 'prelude-visit-term-buffer)
(define-key map (kbd "C-c C-p k") 'prelude-kill-other-buffers) (define-key map (kbd "C-c k") 'prelude-kill-other-buffers)
map) map)
"Keymap for Prelude mode.") "Keymap for Prelude mode.")