branch: master
commit f0b55c8c337c666cac75a271df56104f2ab6c195
Merge: 8f20278 6053545
Author: abo-abo <[email protected]>
Commit: abo-abo <[email protected]>
Merge pull request #9 from demon386/master
Respect `aw-scope' when jumping with `next-window'
---
ace-window.el | 6 +++++-
1 files changed, 5 insertions(+), 1 deletions(-)
diff --git a/ace-window.el b/ace-window.el
index 0f4458b..1fac65c 100644
--- a/ace-window.el
+++ b/ace-window.el
@@ -131,6 +131,10 @@ HANDLER is a function that takes a window argument."
(lambda ()
(interactive)
(let* ((ace-jump-mode-scope aw-scope)
+ (next-window-scope
+ (cl-case aw-scope
+ ('global 'visible)
+ ('frame 'frame)))
(visual-area-list
(sort (aw-list-visual-area)
'aw-visual-area<)))
@@ -138,7 +142,7 @@ HANDLER is a function that takes a window argument."
(0)
(1)
(2
- (,handler (next-window nil nil 'visible)))
+ (,handler (next-window nil nil next-window-scope)))
(t
(let ((candidate-list
(mapcar (lambda (va)
