branch: elpa/telephone-line
commit 80b09f3357161705fce9ccee9ca23056e91ee2cf
Author: Daniel Bordak <[email protected]>
Commit: Daniel Bordak <[email protected]>
Add :inactive modifier
---
telephone-line.el | 18 ++++++++++++------
1 file changed, 12 insertions(+), 6 deletions(-)
diff --git a/telephone-line.el b/telephone-line.el
index 43777ca6ce..d4b8f22b41 100644
--- a/telephone-line.el
+++ b/telephone-line.el
@@ -246,12 +246,18 @@ Secondary separators do not incur a background color
change."
(if (functionp subsegment)
subsegment
(seq-let (segment-func &rest modifiers) subsegment
- (if (seq-contains modifiers ':active)
- `(lambda (face)
- (if (telephone-line-selected-window-active)
- (,segment-func face)
- nil))
- segment-func))))
+ (cond
+ ((seq-contains modifiers ':active)
+ `(lambda (face)
+ (if (telephone-line-selected-window-active)
+ (,segment-func face)
+ nil)))
+ ((seq-contains modifiers ':inactive)
+ `(lambda (face)
+ (if (not (telephone-line-selected-window-active))
+ (,segment-func face)
+ nil)))
+ (t segment-func)))))
subsegments))
;;TODO: Clean this up