Function: sesman--on-C-u-u-sessions

sesman--on-C-u-u-sessions is a byte-compiled function defined in sesman.el.

Signature

(sesman--on-C-u-u-sessions SYSTEM WHICH)

Source Code

;; Defined in ~/.emacs.d/elpa/sesman-20240417.1723/sesman.el
;;; Internal Utilities

(defun sesman--on-C-u-u-sessions (system which)
  (cond
   ((null which)
    (let ((ses (sesman-current-session system)))
      (when ses
        (list ses))))
   ((or (equal which '(4)) (eq which 'linked))
    (sesman--linked-sessions system 'sort))
   ((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))))