Function: magit-repolist-setup

magit-repolist-setup is a byte-compiled function defined in magit-repos.el.

Signature

(magit-repolist-setup COLUMNS &optional FORCE-GLOBAL)

Source Code

;; Defined in ~/.emacs.d/elpa/magit-20261101.2154/magit-repos.el
(defun magit-repolist-setup (columns &optional force-global)
  (unless magit-repository-directories
    (user-error "You need to customize `magit-repository-directories' %s"
                "before you can list repositories"))
  (let ((dir (and (not force-global)
                  (buffer-local-boundp 'magit-repository-directories
                                       (current-buffer))
                  (or (locate-dominating-file default-directory
                                              #'dir-locals--all-files)
                      default-directory))))
    (with-current-buffer
        (get-buffer-create
         (if dir
             (let ((magit-uniquify-buffer-names nil))
               (funcall magit-generate-buffer-name-function
                        'magit-repo-list-mode))
           "*Magit Repositories*"))
      (setq default-directory (or dir (expand-file-name "~")))
      (magit-repolist-mode)
      (setq-local magit-repolist-columns columns)
      (when dir
        (hack-local-variables 'only))
      (magit-repolist-setup-1)
      (magit-repolist-refresh)
      (switch-to-buffer (current-buffer)))))