Function: majutsu--get-mode-buffer

majutsu--get-mode-buffer is a natively compiled function defined in majutsu-base.el.

Signature

(majutsu--get-mode-buffer MODE &optional SELECTED)

Documentation

Get a buffer in MODE.

If SELECTED is non-nil, then only consider buffers displayed in a window of the selected frame.

Source Code

;; Defined in /nix/store/jagqw3nms546pad0gxi5f3wsckk6pji7-emacs-packages-deps/share/emacs/site-lisp/majutsu-base.el
(defun majutsu--get-mode-buffer (mode &optional selected)
  "Get a buffer in MODE.

If SELECTED is non-nil, then only consider buffers displayed in a window
of the selected frame."
  (let ((pred (if selected
                  (lambda (buf)
                    (and (eq (buffer-local-value 'major-mode buf) mode)
                         (get-buffer-window buf)))
                (lambda (buf)
                  (eq (buffer-local-value 'major-mode buf) mode)))))
    (or (and (not selected)
             (seq-find (lambda (buf)
                         (and (funcall pred buf)
                              (get-buffer-window buf)))
                       (buffer-list)))
        (seq-find pred (buffer-list)))))