Function: treemacs--setup-mode-line

treemacs--setup-mode-line is a byte-compiled function defined in treemacs-mode.el.

Signature

(treemacs--setup-mode-line)

Documentation

Create either a simple modeline, or integrate into spaceline.

Source Code

;; Defined in ~/.emacs.d/elpa/treemacs-20251226.1307/treemacs-mode.el
(defun treemacs--setup-mode-line ()
  "Create either a simple modeline, or integrate into spaceline."
  (setq mode-line-format
        (cond (treemacs-user-mode-line-format
               (if (eq 'none treemacs-user-mode-line-format)
                   nil
                 treemacs-user-mode-line-format))
              ((fboundp 'spaceline-install)
               (spaceline-install
                "treemacs" '((workspace-number
                              :face highlight-face)
                             major-mode)
                nil)
               '("%e" (:eval (spaceline-ml-treemacs))))
              ((and (listp (default-value 'mode-line-format))
                    (member 'moody-mode-line-buffer-identification
                            (default-value 'mode-line-format)))
               '(:eval (moody-tab " Treemacs " 10 'down)))
              ((featurep 'doom-modeline)
               (with-no-warnings
                 (eval
                  '(progn
                     (require 'doom-modeline)
                     (doom-modeline-def-segment treemacs-workspace-name
                       "Display treemacs."
                       (propertize (format " %s " (treemacs-workspace->name (treemacs-current-workspace)))
                                   'face (doom-modeline-face 'doom-modeline-buffer-minor-mode)))
                     (doom-modeline-def-modeline 'treemacs '(bar " " major-mode) '(treemacs-workspace-name))
                     (doom-modeline 'treemacs)))))
              (t
               '(:eval (format " Treemacs: %s"
                               (treemacs-workspace->name (treemacs-current-workspace))))))))