Mercurial > dotfiles
annotate .elisp/settings/90.keybindings.el @ 325:64e73453e43f
xmonad: Pull apart custom layout into something readable
This change doesn't affect any behavior, but it does document the custom
layout by naming function parameters. Hopefully, this will make things
easier to fix the next time the XMonad developers break us.
| author | Lucas Bergman <lucas@bergmans.us> |
|---|---|
| date | Tue, 11 Mar 2014 12:49:05 -0500 |
| parents | 745e7cc9c2cd |
| children | b9c8655f12f0 |
| rev | line source |
|---|---|
| 77 | 1 ;; Key Bindings |
| 2 ; M-backspace kills the current buffer | |
| 3 (global-set-key [(meta backspace)] 'kill-this-buffer) | |
|
190
5dbff8b65be7
emacs: switch ways of defining M-backsp
Augie Fackler <durin42@gmail.com>
parents:
177
diff
changeset
|
4 (global-set-key "\M-\d" 'kill-this-buffer) |
| 77 | 5 ; Save early and often, with only one keystroke |
| 6 (global-set-key [(meta s)] 'save-buffer) | |
| 7 ; Typing tab is for lesser editors, make hitting return do that | |
|
128
d59b0340a85a
Man, this is what I wanted all along.
Augie Fackler <durin42@gmail.com>
parents:
126
diff
changeset
|
8 (global-set-key "\C-m" 'indent-new-comment-line) |
| 77 | 9 ; M-l makes more sense to me for jumping to a line |
| 10 (global-set-key "\M-l" 'goto-line) | |
| 11 ; Sometimes C-h is what Backspace sends in a terminal, and I never use C-h | |
| 12 (global-set-key "\C-h" 'backward-delete-char-untabify) | |
| 13 ; M-t is what I want for the textmate file finding | |
| 14 (global-set-key [(meta t)] 'textmate-goto-file) | |
| 126 | 15 ; M-p for bouncing to the matching paren |
| 16 (global-set-key [(meta p)] 'bounce-to-other-paren) | |
| 101 | 17 (global-set-key [(meta control f)] 'textmate-find-in-project-type) |
| 126 | 18 (global-set-key [(meta shift f)] 'textmate-find-in-project) |
| 77 | 19 (global-set-key [(meta m)] 'iconify-or-deiconify-frame) |
| 20 (global-set-key [(control backspace)] 'kill-word) | |
|
95
df45e402581c
Save in server buffer also marks as done.
Augie Fackler <durin42@gmail.com>
parents:
77
diff
changeset
|
21 |
|
168
efe94205bf07
emacs: bind f3 to next-error
Augie Fackler <durin42@gmail.com>
parents:
141
diff
changeset
|
22 (global-set-key [f3] 'next-error) |
|
289
5fd871a98b5f
emacs: start making an f4-dwim function
Augie Fackler <raf@durin42.com>
parents:
236
diff
changeset
|
23 (defun af-dwim-f4 () (interactive) |
|
5fd871a98b5f
emacs: start making an f4-dwim function
Augie Fackler <raf@durin42.com>
parents:
236
diff
changeset
|
24 (cond ((string-match "\\.t$" buffer-file-name) |
|
5fd871a98b5f
emacs: start making an f4-dwim function
Augie Fackler <raf@durin42.com>
parents:
236
diff
changeset
|
25 (textmate-start-compile-in-root |
|
5fd871a98b5f
emacs: start making an f4-dwim function
Augie Fackler <raf@durin42.com>
parents:
236
diff
changeset
|
26 (concat "make " (file-name-nondirectory buffer-file-name)))))) |
|
5fd871a98b5f
emacs: start making an f4-dwim function
Augie Fackler <raf@durin42.com>
parents:
236
diff
changeset
|
27 (global-set-key [f4] 'af-dwim-f4) |
|
177
70dcdb2acade
emacs keybindings: f5 for diff-apply-hunk
Augie Fackler <durin42@gmail.com>
parents:
168
diff
changeset
|
28 (global-set-key [f5] 'diff-apply-hunk) |
|
168
efe94205bf07
emacs: bind f3 to next-error
Augie Fackler <durin42@gmail.com>
parents:
141
diff
changeset
|
29 |
| 101 | 30 ;; M-j for jump to function definition |
|
141
e30655eb7050
textmate.el: synced with upstream
Augie Fackler <durin42@gmail.com>
parents:
128
diff
changeset
|
31 (global-set-key [(meta j)] 'textmate-goto-symbol) |
| 101 | 32 |
| 33 ;; commit emacs heresy? | |
|
236
3e1ec121efaf
emacs: use smex as a replacement for execute-extended-command
Augie Fackler <durin42@gmail.com>
parents:
190
diff
changeset
|
34 (global-set-key [(meta r)] 'smex) |
|
3e1ec121efaf
emacs: use smex as a replacement for execute-extended-command
Augie Fackler <durin42@gmail.com>
parents:
190
diff
changeset
|
35 (global-set-key (kbd "M-R") 'smex-major-mode-commands) |
| 101 | 36 |
|
311
745e7cc9c2cd
emacs: bind C-x C-b to ibuffer, which is awesome
Augie Fackler <raf@durin42.com>
parents:
289
diff
changeset
|
37 (global-set-key (kbd "C-x C-b") 'ibuffer) |
|
745e7cc9c2cd
emacs: bind C-x C-b to ibuffer, which is awesome
Augie Fackler <raf@durin42.com>
parents:
289
diff
changeset
|
38 |
| 101 | 39 ;; Mac-like keybindings for undo/cut/copy/paste |
| 40 (global-set-key [(meta c)] 'kill-ring-save) | |
| 41 (global-set-key [(meta x)] 'kill-region) | |
| 42 (global-set-key [(meta z)] 'undo) | |
| 43 (global-set-key [(meta v)] 'yank) | |
| 44 (global-set-key [M-return] 'fullscreen) | |
| 45 (global-set-key [(control v)] 'yank-pop) | |
| 46 | |
| 47 ;; Fixup hooks for modes that like taking my keys back | |
| 48 (add-hook 'text-mode-hook '(lambda () | |
| 49 (define-key text-mode-map "\M-s" | |
| 50 'save-buffer))) | |
| 51 (add-hook 'comint-mode-hook '(lambda () | |
| 52 (local-set-key "\M-r" | |
| 53 'execute-extended-command))) | |
| 54 | |
|
95
df45e402581c
Save in server buffer also marks as done.
Augie Fackler <durin42@gmail.com>
parents:
77
diff
changeset
|
55 (defun server-save-buffer-and-finish () |
|
df45e402581c
Save in server buffer also marks as done.
Augie Fackler <durin42@gmail.com>
parents:
77
diff
changeset
|
56 (interactive) |
|
df45e402581c
Save in server buffer also marks as done.
Augie Fackler <durin42@gmail.com>
parents:
77
diff
changeset
|
57 (save-buffer) (server-edit)) |
|
df45e402581c
Save in server buffer also marks as done.
Augie Fackler <durin42@gmail.com>
parents:
77
diff
changeset
|
58 (add-hook 'server-switch-hook |
|
df45e402581c
Save in server buffer also marks as done.
Augie Fackler <durin42@gmail.com>
parents:
77
diff
changeset
|
59 '(lambda ()(local-set-key "\M-s" 'server-save-buffer-and-finish ))) |