6 changed files with 108 additions and 31 deletions
-
6.gitmodules
-
1personal
-
20prelude/prelude-core.el
-
2prelude/prelude-editor.el
-
105prelude/prelude-global-keybindings.el
-
5prelude/prelude-packages.el
@ -1,6 +0,0 @@ |
|||
[submodule "personal"] |
|||
path = personal |
|||
url = https://github.com/bbatsov/emacs-prelude-personal.git |
|||
[submodule "vendor/feature-mode"] |
|||
path = vendor/feature-mode |
|||
url = https://github.com/michaelklishin/cucumber.el |
|||
@ -0,0 +1,105 @@ |
|||
;;; prelude-global-keybindings.el --- Emacs Prelude: some useful keybindings. |
|||
;; |
|||
;; Copyright (c) 2011-2012 Bozhidar Batsov |
|||
;; |
|||
;; Author: Bozhidar Batsov <bozhidar@batsov.com> |
|||
;; URL: http://batsov.com/emacs-prelude |
|||
;; Version: 1.0.0 |
|||
;; Keywords: convenience |
|||
|
|||
;; This file is not part of GNU Emacs. |
|||
|
|||
;;; Commentary: |
|||
|
|||
;; Lots of useful keybindings. |
|||
|
|||
;;; License: |
|||
|
|||
;; This program is free software; you can redistribute it and/or |
|||
;; modify it under the terms of the GNU General Public License |
|||
;; as published by the Free Software Foundation; either version 3 |
|||
;; of the License, or (at your option) any later version. |
|||
;; |
|||
;; This program is distributed in the hope that it will be useful, |
|||
;; but WITHOUT ANY WARRANTY; without even the implied warranty of |
|||
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|||
;; GNU General Public License for more details. |
|||
;; |
|||
;; You should have received a copy of the GNU General Public License |
|||
;; along with GNU Emacs; see the file COPYING. If not, write to the |
|||
;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
|||
;; Boston, MA 02110-1301, USA. |
|||
|
|||
;;; Code: |
|||
|
|||
;; You know, like Readline. |
|||
(global-set-key (kbd "C-M-h") 'backward-kill-word) |
|||
|
|||
;; Align your code in a pretty way. |
|||
(global-set-key (kbd "C-x \\") 'align-regexp) |
|||
|
|||
;; Font size |
|||
(define-key global-map (kbd "C-+") 'text-scale-increase) |
|||
(define-key global-map (kbd "C--") 'text-scale-decrease) |
|||
|
|||
;; Window switching. (C-x o goes to the next window) |
|||
(global-set-key (kbd "C-x O") (lambda () |
|||
(interactive) |
|||
(other-window -1))) ;; back one |
|||
|
|||
;; Indentation help |
|||
(global-set-key (kbd "C-x ^") 'join-line) |
|||
|
|||
;; Start proced in a similar manner to dired |
|||
(global-set-key (kbd "C-x p") 'proced) |
|||
|
|||
;; Start eshell or switch to it if it's active. |
|||
(global-set-key (kbd "C-x m") 'eshell) |
|||
|
|||
;; Start a new eshell even if one is active. |
|||
(global-set-key (kbd "C-x M") (lambda () (interactive) (eshell t))) |
|||
|
|||
;; Start a regular shell if you prefer that. |
|||
(global-set-key (kbd "C-x M-m") 'shell) |
|||
|
|||
;; If you want to be able to M-x without meta |
|||
(global-set-key (kbd "C-x C-m") 'execute-extended-command) |
|||
|
|||
;; A complementary binding to the apropos-command(C-h a) |
|||
(global-set-key (kbd "C-h A") 'apropos) |
|||
|
|||
;; Activate occur easily inside isearch |
|||
(define-key isearch-mode-map (kbd "C-o") |
|||
(lambda () (interactive) |
|||
(let ((case-fold-search isearch-case-fold-search)) |
|||
(occur (if isearch-regexp |
|||
isearch-string |
|||
(regexp-quote isearch-string)))))) |
|||
|
|||
;; use hippie-expand instead of dabbrev |
|||
(global-set-key (kbd "M-/") 'hippie-expand) |
|||
|
|||
;; replace buffer-menu with ibuffer |
|||
(global-set-key (kbd "C-x C-b") 'ibuffer) |
|||
|
|||
;; toggle menu-bar visibility |
|||
(global-set-key (kbd "<f12>") 'menu-bar-mode) |
|||
|
|||
;; real Emacs hackers don't use the arrow keys |
|||
(global-unset-key [up]) |
|||
(global-unset-key [down]) |
|||
(global-unset-key [left]) |
|||
(global-unset-key [right]) |
|||
|
|||
;; use M-f and M-b instead |
|||
(global-unset-key [M-left]) |
|||
(global-unset-key [M-right]) |
|||
|
|||
(global-set-key (kbd "C-x g") 'magit-status) |
|||
|
|||
(global-set-key (kbd "C-=") 'er/expand-region) |
|||
(global-set-key (kbd "C-c w") (make-repeatable-command 'er/expand-region)) |
|||
|
|||
(provide 'prelude-global-keybindings) |
|||
|
|||
;;; prelude-global-keybindings.el ends here |
|||
Write
Preview
Loading…
Cancel
Save
Reference in new issue