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

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

[nongnu] elpa/telephone-line 74068cd04a 167/195: Added segments "plain"


From: ELPA Syncer
Subject: [nongnu] elpa/telephone-line 74068cd04a 167/195: Added segments "plain" buffer name and modified-state-only. (#93)
Date: Wed, 5 Jan 2022 02:59:51 -0500 (EST)

branch: elpa/telephone-line
commit 74068cd04a4a34095fe816ae71880ca271f2ea9e
Author: Sebastián Monía <seb.hoagie@outlook.com>
Commit: Daniel Bordak <dbordak@fastmail.fm>

    Added segments "plain" buffer name and modified-state-only. (#93)
---
 telephone-line-segments.el | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/telephone-line-segments.el b/telephone-line-segments.el
index 991ab8fcfc..4afff11f39 100644
--- a/telephone-line-segments.el
+++ b/telephone-line-segments.el
@@ -92,6 +92,14 @@ Adapted from doom-modeline."
 (telephone-line-defsegment* telephone-line-minions-mode-segment ()
   (telephone-line-raw minions-mode-line-modes t))
 
+(telephone-line-defsegment* telephone-line-buffer-name-segment ()
+  (telephone-line-raw (buffer-name)))
+
+(telephone-line-defsegment* telephone-line-buffer-modified-segment ()
+    (if (buffer-modified-p)
+        (telephone-line-raw "!")
+      (telephone-line-raw "-")))
+
 (telephone-line-defsegment telephone-line-narrow-segment ()
   "%n")
 



reply via email to

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