diff options
Diffstat (limited to 'lisp/ravi-init-appearance.el')
| -rw-r--r-- | lisp/ravi-init-appearance.el | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/lisp/ravi-init-appearance.el b/lisp/ravi-init-appearance.el index f9b50bc..c646498 100644 --- a/lisp/ravi-init-appearance.el +++ b/lisp/ravi-init-appearance.el @@ -361,6 +361,14 @@ Delete all whitespace on a successive key press." ("M-O" . ravi/dispatched-ace-window)) :config (progn + (defun ravi/switch-to-last-window () + (interactive) + (let ((win (get-mru-window t t t))) + (unless win (error "Last window not found.")) + (let ((frame (window-frame win))) + (raise-frame frame) + (select-frame-set-input-focus frame) + (select-window win)))) (set-face-attribute 'aw-leading-char-face nil :foreground "deep sky blue" :weight 'bold :height 3.0) (set-face-attribute 'aw-mode-line-face nil :inherit 'mode-line-buffer-id :foreground "lawn green") (setq aw-keys '(?d ?f ?g ?h ?j ?k ?l ?i ?e) @@ -369,6 +377,7 @@ Delete all whitespace on a successive key press." '((?x aw-delete-window "Ace - Delete Window") (?c aw-swap-window "Ace - Swap Window") (?n aw-flip-window) + (?\r ravi/switch-to-last-window) (?v aw-split-window-vert "Ace - Split Vert Window") (?h aw-split-window-horz "Ace - Split Horz Window") (?m delete-other-windows "Ace - Maximize Window") |