diff --git a/ace-window.el b/ace-window.el index 70f4441..046e5a2 100644 --- a/ace-window.el +++ b/ace-window.el @@ -263,6 +263,7 @@ LEAF is (PT . WND)." '((?x aw-delete-window " Ace - Delete Window") (?m aw-swap-window " Ace - Swap Window") (?M aw-move-window " Ace - Move Window") + (?j aw-switch-buffer-in-window " Ace - Select Buffer") (?n aw-flip-window) (?c aw-split-window-fair " Ace - Split Fair Window") (?v aw-split-window-vert " Ace - Split Vert Window") @@ -466,6 +467,11 @@ Windows are numbered top down, left to right." (delete-window window) (error "Got a dead window %S" window))))) +(defun aw-switch-buffer-in-window (window) + "Select buffer in WINDOW." + (aw-switch-to-window window) + (call-interactively 'switch-to-buffer)) + (defcustom aw-swap-invert nil "When non-nil, the other of the two swapped windows gets the point." :type 'boolean)