summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2014-02-11 00:13:13 -0500
committerKyle Meyer <kyle@kyleam.com>2014-02-11 00:13:13 -0500
commit836e5544d8765ff27772c312d0f464391b5e2918 (patch)
treea5880d2b1cbcb177a99edbbf11fca8d890a63650
parent897405c94d70f257c93900f8b12a1108d6cb7cc4 (diff)
downloademacs.d-836e5544d8765ff27772c312d0f464391b5e2918.tar.gz
Group keybindings in init-external
-rw-r--r--lisp/init-external.el15
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)