|
|
|
@ -263,6 +263,7 @@ LEAF is (PT . WND)." |
|
|
|
'((?x aw-delete-window " Ace - Delete Window") |
|
|
|
'((?x aw-delete-window " Ace - Delete Window") |
|
|
|
(?m aw-swap-window " Ace - Swap Window") |
|
|
|
(?m aw-swap-window " Ace - Swap Window") |
|
|
|
(?M aw-move-window " Ace - Move Window") |
|
|
|
(?M aw-move-window " Ace - Move Window") |
|
|
|
|
|
|
|
(?j aw-switch-buffer-in-window " Ace - Select Buffer") |
|
|
|
(?n aw-flip-window) |
|
|
|
(?n aw-flip-window) |
|
|
|
(?c aw-split-window-fair " Ace - Split Fair Window") |
|
|
|
(?c aw-split-window-fair " Ace - Split Fair Window") |
|
|
|
(?v aw-split-window-vert " Ace - Split Vert 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) |
|
|
|
(delete-window window) |
|
|
|
(error "Got a dead window %S" 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 |
|
|
|
(defcustom aw-swap-invert nil |
|
|
|
"When non-nil, the other of the two swapped windows gets the point." |
|
|
|
"When non-nil, the other of the two swapped windows gets the point." |
|
|
|
:type 'boolean) |
|
|
|
:type 'boolean) |
|
|
|
|