[nongnu] elpa/telephone-line 305b5dbfec 163/195: Added minions-mode-segment, compatible with https://github.com/tarsius/minions.

[ELPA Syncer]

branch: elpa/telephone-line
commit 305b5dbfec8d48ad2ba4fcc5790ae4675362b4fd
Author: Sebastián Monía <sebastian.monia@starz.com>
Commit: Sebastián Monía <sebastian.monia@starz.com>

    Added minions-mode-segment, compatible with 
https://github.com/tarsius/minions.
---
 telephone-line-segments.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/telephone-line-segments.el b/telephone-line-segments.el
index 068fac3c7a..7800838520 100644
--- a/telephone-line-segments.el
+++ b/telephone-line-segments.el
@@ -89,6 +89,9 @@ Adapted from doom-modeline."
 (telephone-line-defsegment* telephone-line-simple-minor-mode-segment ()
   (telephone-line-raw minor-mode-alist t))
 
+(telephone-line-defsegment* telephone-line-minions-mode-segment ()
+  (telephone-line-raw minions-mode-line-modes t))
+
 (telephone-line-defsegment telephone-line-narrow-segment ()
   "%n")
 
@@ -122,6 +125,7 @@ mouse-3: Toggle minor modes"
                  face ,face)))
 
 (defun telephone-line--hud-axis-func (y)
+  "This function does something with Y.  And it has a docstring now!"
   (let* ((height (or telephone-line-height (frame-char-height)))
          (start (floor (* height (float (window-start))) (point-max)))
          (end (ceiling (* height (float (window-end))) (point-max))))
@@ -193,7 +197,7 @@ If it doesn't exist, create and cache it."
              (split-string dir "[^[:word:]]" t)))))
 
 (defun telephone-line--truncate-path (path truncate-until)
-  "Truncate PATH. TRUNCATE-UNTIL indicates how far to truncate; -1 means leave 
the last element, 0 means truncate all, etc."
+  "Truncate PATH.  TRUNCATE-UNTIL indicates how far to truncate; -1 means 
leave the last element, 0 means truncate all, etc."
   (let* ((dirs (split-string path "/"))
          (take (+ truncate-until (length dirs)))
          (trunc (seq-take dirs take))