From 836e5544d8765ff27772c312d0f464391b5e2918 Mon Sep 17 00:00:00 2001
From: Kyle Meyer <kyle@kyleam.com>
Date: Tue, 11 Feb 2014 00:13:13 -0500
Subject: Group keybindings in init-external

---
 lisp/init-external.el | 15 +++++++--------
 1 file changed, 7 insertions(+), 8 deletions(-)

(limited to 'lisp')

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)
-- 
cgit v1.2.3