From 8367e65b411fc40239233cc98a51a85f5ce224fc Mon Sep 17 00:00:00 2001
From: Kyle Meyer <kyle@kyleam.com>
Date: Mon, 23 Mar 2015 00:34:56 -0400
Subject: Swap meaning of ace-window prefix arguments

---
 lisp/init-ace.el | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

(limited to 'lisp/init-ace.el')

diff --git a/lisp/init-ace.el b/lisp/init-ace.el
index c6e1071..5e8eba8 100644
--- a/lisp/init-ace.el
+++ b/lisp/init-ace.el
@@ -36,6 +36,14 @@
 (setq aw-keys '(?a ?s ?d ?f ?g ?h ?j ?k ?l)
       aw-scope 'frame)
 
-(key-chord-define-global "jw" 'ace-window)
+(defun km/ace-window (arg)
+  "Run `ace-window', swapping single and double C-u's."
+  (interactive "p")
+  (cl-case arg
+    (4  (setq arg 16))
+    (16 (setq arg 4)))
+  (ace-window arg))
+
+(key-chord-define-global "jw" 'km/ace-window)
 
 (provide 'init-ace)
-- 
cgit v1.2.3