Mercurial > dotfiles
annotate .elisp/settings/90.keybindings.el @ 307:e37b00236907
zshrc: work around my shell function that turns on utf8 in screen
The zsh built in which was getting confused by the function, and
always claimed screen was installed. I'm finally running into machines
with tmux but not screen, so I noticed.
author | Augie Fackler <raf@durin42.com> |
---|---|
date | Sat, 19 Jan 2013 19:29:58 -0600 |
parents | 5fd871a98b5f |
children | 745e7cc9c2cd |
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 |
37 ;; Mac-like keybindings for undo/cut/copy/paste | |
38 (global-set-key [(meta c)] 'kill-ring-save) | |
39 (global-set-key [(meta x)] 'kill-region) | |
40 (global-set-key [(meta z)] 'undo) | |
41 (global-set-key [(meta v)] 'yank) | |
42 (global-set-key [M-return] 'fullscreen) | |
43 (global-set-key [(control v)] 'yank-pop) | |
44 | |
45 ;; Fixup hooks for modes that like taking my keys back | |
46 (add-hook 'text-mode-hook '(lambda () | |
47 (define-key text-mode-map "\M-s" | |
48 'save-buffer))) | |
49 (add-hook 'comint-mode-hook '(lambda () | |
50 (local-set-key "\M-r" | |
51 'execute-extended-command))) | |
52 | |
95
df45e402581c
Save in server buffer also marks as done.
Augie Fackler <durin42@gmail.com>
parents:
77
diff
changeset
|
53 (defun server-save-buffer-and-finish () |
df45e402581c
Save in server buffer also marks as done.
Augie Fackler <durin42@gmail.com>
parents:
77
diff
changeset
|
54 (interactive) |
df45e402581c
Save in server buffer also marks as done.
Augie Fackler <durin42@gmail.com>
parents:
77
diff
changeset
|
55 (save-buffer) (server-edit)) |
df45e402581c
Save in server buffer also marks as done.
Augie Fackler <durin42@gmail.com>
parents:
77
diff
changeset
|
56 (add-hook 'server-switch-hook |
df45e402581c
Save in server buffer also marks as done.
Augie Fackler <durin42@gmail.com>
parents:
77
diff
changeset
|
57 '(lambda ()(local-set-key "\M-s" 'server-save-buffer-and-finish ))) |