Function: sesman--cap-system-name

sesman--cap-system-name is a byte-compiled function defined in sesman.el.

Signature

(sesman--cap-system-name SYSTEM)

Source Code

;; Defined in ~/.emacs.d/elpa/sesman-20240417.1723/sesman.el
(defun sesman--cap-system-name (system)
  (let ((name (symbol-name system)))
    (if (string-match-p "^[[:upper:]]" name)
        name
      (capitalize name))))