branch: externals/window-commander
commit 5d1ea190abdc7093a8bfb20ca98b06cb2e3ffe8e
Author: Daniel Semyonov <[email protected]>
Commit: Daniel Semyonov <[email protected]>
Only display a mode line lighter for tracked windows
* swsw.el (swsw-mode): Add a check to disable displaying a mode line
lighter for windows which don't appear in 'swsw-window-list'.
---
swsw.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/swsw.el b/swsw.el
index 769f3a06cf..38d6683a26 100644
--- a/swsw.el
+++ b/swsw.el
@@ -85,8 +85,9 @@ line update for all windows."
(define-minor-mode swsw-mode
"Minor mode for selecting windows by their ID."
:global t
- :lighter (:eval (format swsw-mode-lighter-format
- (window-parameter (selected-window) 'swsw-id)))
+ :lighter (:eval (when (rassq (selected-window) swsw-window-list)
+ (format swsw-mode-lighter-format
+ (window-parameter (selected-window) 'swsw-id))))
(if swsw-mode
(progn
(walk-windows #'swsw-update nil t)
