emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 7e618a5 19/20: Merge commit 'b114cf8a93224c85c51e95db52bf3


From: Oleh Krehel
Subject: [elpa] master 7e618a5 19/20: Merge commit 'b114cf8a93224c85c51e95db52bf359131130476' from ace-window
Date: Sat, 09 May 2015 11:57:56 +0000

branch: master
commit 7e618a52dba86ba49b15b4a751dbbc9d44a1366e
Merge: e3dbd7a b114cf8
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    Merge commit 'b114cf8a93224c85c51e95db52bf359131130476' from ace-window
---
 packages/ace-window/ace-window.el |   12 +++++++++---
 1 files changed, 9 insertions(+), 3 deletions(-)

diff --git a/packages/ace-window/ace-window.el 
b/packages/ace-window/ace-window.el
index f34a77a..791b34d 100644
--- a/packages/ace-window/ace-window.el
+++ b/packages/ace-window/ace-window.el
@@ -87,6 +87,10 @@
 Use M-0 `ace-window' to toggle this value."
   :type 'boolean)
 
+(defcustom aw-ignore-current nil
+  "When t, `ace-window' will ignore `selected-window'."
+  :type 'boolean)
+
 (defcustom aw-background t
   "When t, `ace-window' will dim out all buffers temporarily when used.'."
   :type 'boolean)
@@ -115,9 +119,11 @@ Use M-0 `ace-window' to toggle this value."
 ;;* Implementation
 (defun aw-ignored-p (window)
   "Return t if WINDOW should be ignored."
-  (and aw-ignore-on
-       (member (buffer-name (window-buffer window))
-               aw-ignored-buffers)))
+  (or (and aw-ignore-on
+           (member (buffer-name (window-buffer window))
+                   aw-ignored-buffers))
+      (and aw-ignore-current
+           (equal window (selected-window)))))
 
 (defun aw-window-list ()
   "Return the list of interesting windows."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]