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

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

[nongnu] elpa/sesman 1f5b2b2338 075/100: More consistent empty prefix in


From: ELPA Syncer
Subject: [nongnu] elpa/sesman 1f5b2b2338 075/100: More consistent empty prefix in sesman-info
Date: Tue, 28 Dec 2021 14:06:04 -0500 (EST)

branch: elpa/sesman
commit 1f5b2b2338f12f03766abf92ec5c08702320da2f
Author: Vitalie Spinu <spinuvit@gmail.com>
Commit: Vitalie Spinu <spinuvit@gmail.com>

    More consistent empty prefix in sesman-info
---
 sesman.el | 13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/sesman.el b/sesman.el
index c1ad28cb8e..4983f85802 100644
--- a/sesman.el
+++ b/sesman.el
@@ -370,15 +370,14 @@ sessions."
          (i 1)
          (sessions (if all
                        (sesman-sessions system t)
-                     (sesman-current-sessions system))))
+                     (sesman-current-sessions system)))
+         (empty-prefix (if (> (length sessions) 1) "  " "")))
     (if sessions
         (message (mapconcat (lambda (ses)
-                              (let ((prefix (if (> (length sessions) 1)
-                                                (if (sesman-relevant-session-p 
system ses)
-                                                    (prog1 (format "%d " i)
-                                                      (setq i (1+ i)))
-                                                  "  ")
-                                              "")))
+                              (let ((prefix (if (sesman-relevant-session-p 
system ses)
+                                                (prog1 (format "%d " i)
+                                                  (setq i (1+ i)))
+                                              empty-prefix)))
                                 (sesman--format-session system ses prefix)))
                             sessions
                             "\n"))



reply via email to

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