diff options
| -rw-r--r-- | lisp/init-external.el | 15 |
1 files changed, 7 insertions, 8 deletions
diff --git a/lisp/init-external.el b/lisp/init-external.el index b18cd0e..343af00 100644 --- a/lisp/init-external.el +++ b/lisp/init-external.el @@ -1,17 +1,9 @@ -(define-prefix-command 'external-map) -(global-set-key (kbd "C-c x") 'external-map) - (defvar km/terminal "urxvt") (defun km/open-external-terminal () (interactive) (start-process "ext-term" nil km/terminal)) -(define-key external-map "t" 'km/open-external-terminal) -(define-key external-map "s" 'shell-command) - -(global-set-key (kbd "C-c c") 'compile) - (defadvice recompile (around restore-windows activate) "Prevent recompiling from spawning new windows." (save-window-excursion @@ -25,6 +17,13 @@ other window when an asynchronous command is run." ad-do-it (jump-to-register :before-shell-command)) +(define-prefix-command 'external-map) +(global-set-key (kbd "C-c x") 'external-map) + +(define-key external-map "t" 'km/open-external-terminal) +(define-key external-map "s" 'shell-command) + +(global-set-key (kbd "C-c c") 'compile) (global-set-key (kbd "C-c g") 'recompile) (provide 'init-external) |