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

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

[nongnu] elpa/sesman 5fc5934b5f 044/100: Extend semantics of 'which' arg


From: ELPA Syncer
Subject: [nongnu] elpa/sesman 5fc5934b5f 044/100: Extend semantics of 'which' argument in interactive commands
Date: Tue, 28 Dec 2021 14:06:01 -0500 (EST)

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

    Extend semantics of 'which' argument in interactive commands
---
 sesman.el | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/sesman.el b/sesman.el
index d24ec3ff62..98a2c3b572 100644
--- a/sesman.el
+++ b/sesman.el
@@ -101,6 +101,15 @@ Can be either a symbol, or a function returning a symbol.")
     (sesman-linked-sessions system))
    ((or (equal which '(16)) (eq which 'all) (eq which t))
     (sesman--all-system-sessions system 'sort))
+   ;; session itself
+   ((and (listp which)
+         (or (stringp (car which))
+             (symbolp (car which))))
+    (list which))
+   ;; session name
+   ((or (stringp which)
+        (symbolp which)
+        (gethash (cons system which) sesman-sessions-hashmap)))
    (t (error "Invalid which argument (%s)" which))))
 
 (defun sesman--cap-system-name (system)



reply via email to

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