diff options
Diffstat (limited to 'lisp/ravi-init-appearance.el')
| -rw-r--r-- | lisp/ravi-init-appearance.el | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/lisp/ravi-init-appearance.el b/lisp/ravi-init-appearance.el index 80c4d8a..af0d411 100644 --- a/lisp/ravi-init-appearance.el +++ b/lisp/ravi-init-appearance.el @@ -351,7 +351,8 @@ Delete all whitespace on a successive key press." :ensure t) (use-package ace-window - :bind (("M-o" . ace-window)) + :bind (("M-o" . ace-window) + ("M-O" . ravi/dispatched-ace-window)) :config (progn (set-face-attribute 'aw-leading-char-face nil :foreground "deep sky blue" :weight 'bold :height 3.0) @@ -370,6 +371,12 @@ Delete all whitespace on a successive key press." (?u winner-undo) (?r winner-redo))) + (defun ravi/dispatched-ace-window (arg) + "Select window with dispatch always present" + (interactive "p") + (let ((aw-dispatch-always t)) + (ace-window arg))) + (when (package-installed-p 'hydra) (defhydra hydra-window-size (:color red) "Windows size" |