comparison .elisp/settings/90.keybindings.el @ 289:5fd871a98b5f

emacs: start making an f4-dwim function I've had one at work, but only now am getting around to it here.
author Augie Fackler <raf@durin42.com>
date Wed, 17 Oct 2012 08:21:15 -0500
parents 3e1ec121efaf
children 745e7cc9c2cd
comparison
equal deleted inserted replaced
288:e00b19603472 289:5fd871a98b5f
18 (global-set-key [(meta shift f)] 'textmate-find-in-project) 18 (global-set-key [(meta shift f)] 'textmate-find-in-project)
19 (global-set-key [(meta m)] 'iconify-or-deiconify-frame) 19 (global-set-key [(meta m)] 'iconify-or-deiconify-frame)
20 (global-set-key [(control backspace)] 'kill-word) 20 (global-set-key [(control backspace)] 'kill-word)
21 21
22 (global-set-key [f3] 'next-error) 22 (global-set-key [f3] 'next-error)
23 (defun af-dwim-f4 () (interactive)
24 (cond ((string-match "\\.t$" buffer-file-name)
25 (textmate-start-compile-in-root
26 (concat "make " (file-name-nondirectory buffer-file-name))))))
27 (global-set-key [f4] 'af-dwim-f4)
23 (global-set-key [f5] 'diff-apply-hunk) 28 (global-set-key [f5] 'diff-apply-hunk)
24 29
25 ;; M-j for jump to function definition 30 ;; M-j for jump to function definition
26 (global-set-key [(meta j)] 'textmate-goto-symbol) 31 (global-set-key [(meta j)] 'textmate-goto-symbol)
27 32