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

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

[nongnu] elpa/telephone-line 3cb6ab4afc 161/195: Fix for #83


From: ELPA Syncer
Subject: [nongnu] elpa/telephone-line 3cb6ab4afc 161/195: Fix for #83
Date: Wed, 5 Jan 2022 02:59:45 -0500 (EST)

branch: elpa/telephone-line
commit 3cb6ab4afcefec1e08d5ca70f9bd4320a37a7fcf
Author: Daniel Bordak <dbordak@fastmail.fm>
Commit: Daniel Bordak <dbordak@fastmail.fm>

    Fix for #83
---
 telephone-line.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/telephone-line.el b/telephone-line.el
index 537697c195..d87c08f6b4 100644
--- a/telephone-line.el
+++ b/telephone-line.el
@@ -242,7 +242,7 @@ Secondary separators do not incur a background color 
change."
 
 (defun telephone-line-propertize-segment (pred face segment)
   (unless (seq-empty-p (string-trim (format-mode-line segment)))
-    (if pred
+    (if (or pred (not (telephone-line-selected-window-active)))
         `(:propertize (" " ,segment " ") face ,face)
       `(" " ,segment " "))))
 
@@ -274,9 +274,9 @@ Secondary separators do not incur a background color 
change."
                 (if (plist-get modifiers ':active)
                     (setq segment-func
                           `(lambda (face)
-                            (if (telephone-line-selected-window-active)
-                                (,segment-func face)
-                              nil))))
+                             (if (telephone-line-selected-window-active)
+                                 (,segment-func face)
+                               nil))))
                 (if (plist-get modifiers ':inactive)
                     (setq segment-func
                           `(lambda (face)



reply via email to

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