Mercurial > dotfiles
comparison .elisp/settings/90.keybindings.el @ 477:8373f6924e50
emacs: kludge around a case of emacs being too clever for me
author | Augie Fackler <raf@durin42.com> |
---|---|
date | Thu, 21 Feb 2019 19:54:55 -0500 |
parents | 6bc014966731 |
children | 0731ceeb27dd |
comparison
equal
deleted
inserted
replaced
476:6bc014966731 | 477:8373f6924e50 |
---|---|
21 | 21 |
22 (global-set-key [f3] 'next-error) | 22 (global-set-key [f3] 'next-error) |
23 (defun af-dwim-f4 () (interactive) | 23 (defun af-dwim-f4 () (interactive) |
24 (cond ((string-match "\\.t$" buffer-file-name) | 24 (cond ((string-match "\\.t$" buffer-file-name) |
25 (textmate-start-compile-in-root | 25 (textmate-start-compile-in-root |
26 (concat "cd tests && python run-tests.py --local " | 26 ;; hack alert: the leading `echo` here prevents emacs from |
27 ;; being too smart and "fixing" our default-directory. | |
28 (concat "echo && cd tests && python run-tests.py --local " | |
27 (file-name-nondirectory buffer-file-name)))) | 29 (file-name-nondirectory buffer-file-name)))) |
28 ((string-match "\\.rs$" buffer-file-name) | 30 ((string-match "\\.rs$" buffer-file-name) |
29 (textmate-start-compile-in-root "cargo test")) | 31 (textmate-start-compile-in-root "cargo test")) |
30 )) | 32 )) |
31 (global-set-key [f2] 'other-window) | 33 (global-set-key [f2] 'other-window) |