diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/init-ace.el | 10 |
1 files changed, 9 insertions, 1 deletions
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) |